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ABSTRACT 


THE FPPeje DATA EXERCISER I$ DESIGNED TO TEST THE FLOATING POINT PROSCESSOR 

LOGIC AND DATA BREAK FACYLITY AY A MAXIMUM RATE USING ALL PPPei2 INSTRUCTIONS 

IN FLOATING POINT, OOUBLE PRECISION AND EXTENDED FLOATING POINT PRECISION MODES ON RANDOM DATA 
PATTERNS, OPERATOR COMMUNICATION WITH THE FPPei2 EXERCISER 

IS PROVIDED VIA THE SWITCH REGISTER AND ASRe33 TTY OR EQUIVALENT, 


REQUIREMENTS 
EQUIPMENT 


A) A FPPej2 FLOATING POINT PROCESSOR 
B) A STANDARD POP#g OR PDPel2 
C) AN A8R@33 TELETYPE OR EQUIVALENT 


STORAGE 


THIS PROGRAM IS DESIGNED TO RUN IN MEMORY FIELD 0 AND IT OCCUPIES 
VIRTUALLY ALL FIELD 0, 


PRELIMINARY PROGRAMS 


ALL PDP@8 AND/OR POPe{2 MODE BASIC INSTRUCTION DIAGNOSTICS AND 
EXERCISERS MUST HAVE BEEN SUCCESSFULLY RUN PRIOR TO RUNNING 
THE PROGRAM, 


IN ADDITION, IT I8 RECOMMENDED THAT THE FOLLOWING FPPw{2 DIAGNOSTIcs 
BE RUN PRIOR TO THE FPPe{2 DATA EXERCISER, 


A) FPPI2A OR PLOATING POINT INSTRUCTION TEST 2A 
B) FPPY2B8 OR FLOATING POXNT INSTRUCTION TESY 28 
C) FPPI2C OR FLOATING POINT INSTRUCTION TEST 2¢ 
D) FADDRS OR FLOATING POINT ADDRESS TEST 


LOADING PROCEDURE 


REFER TO BYNARY LOADING PROCEDURES FOR THE PARTICULAR MACHINE BEING USED, 
THIS PROGRAM WILL DESTROY THE LAST PAGE OF FYELD 0.» 


OF POPC OPE TRE WHO THT ARGH ETETEEBHERTO HBAS TTHTERAETERRA 


FPP#i2 DESCRIPTION 


THE FPPej2 YS A SELF CONTAINED COMPUTER CONNECTED To THE 1/0 BUS 
OF A POPwi2 OR PDPa8, THO RESTRICTIONS EXIST WHICH MAKE THE FPPeia 
DIFFERENT FROM THE HOST COMPUTER TO WHIGH IT I8 ATTACHED, 


A) THE FPPe{2 HAS NO CORE MEMORY OF [78 OWN, IT USES THE 
CORE MEMORY OF THE HOST COMPUTER VIA THE DATA BREAK 
FACILITY, THE FPPwi2 MAY CYCLESSTEAL UP TO SOX OF THE 
HOST COMPUTER'S MEMORY CYCLES, 


B) THE FPP#1i2 CAN ONLY BE STARTED BY THE HOST COMPUTER, 
ONCE STARTED IT WILL CONTINUE TO EXECUTE Fppwi2 CODE 
UNTIL IT COMPLETES THE SPECIFIED OPERATIONS, EXITS WITH 
AN ERROR CONDITION OR IS HALTED VIA A FPHLT ToT ISSUED 
BY THE HOST COMPUTER, 


age . 





Aibet PROGRAM DESCREPTION 


THE FPPei2 DATA EXERCISER DIAGNOSTIC CAN BE BROKEN DOWN INTO THREE 
SEPARATE PROGRAMS EACH DEPENDENT ON AND INTERACTING WITH THE OTHER 
WO, THEY ARE, 


A} A UTILITY PROGRAM WRITTEN IN POP#& CODE WHICHE 
i) SERVICES ALL INTERRUPTS, 
2) O0E&S ERROR VERIFICATION, 
3) OQUTPUTS ALL ERROR MESSAGES, 
B) INTERROGATES THE SWITCH REGISTER YRON REENTRY TO THE 
FPPei2 PROGRAM AFTER ERROR VERIFICATION OR ERROR 
OCCURANCE, 


B) A CONTROL PROGRAM WRITTEN IN PDPeS CODE WHICH RUNG IN PARALLEL 
WITH THE FPPel2 PROGRAM, 78 FUNCTIONS ARE? 
4) STARTS THE Fepei2 COMPUTER FOR EACH SEQUENTIAL 
FPPej2 TEST, 
2) RUNS AS A BACKGROUND PROGRAM, 
3) GENERATES RANOOM NUMBERS FOR FPPei2 RANDOM NUMBER TABLES 1 AND 3, 
4) MONITORS THE SWITCH REGISTER, 
S) COMMUNICATES SWITCH REGISTER FUNCTIONS TO THE FrPete2 
COMPUTER WITHOUT INTERRUPTING IT8 OPERATION, 
A) LOCKS ONTO FPPei2 TESY SELECTED IN SWITCH REGISTER 
SWITCHES 7eji IF THEY ARE NON@ZERO, 
B) LOCKS ONTO FPPeg2 TEST SEGMENT BEING EXECUTED IF SWITCH 
@ OF THE SWITCH REGISTER 18 SET, 
C) HALTS JF SWITCH 6 OF THE SWITCH REGISTER IS SET, 
0) FLAGS THE FPPeij2 WHEN THE RANDOM NUMBER TABLES ARE FULL, 
E) PROVIDES A TIME OUT LOOP FOR FPPei2 TESTS, 
6) IENTERROGATES THE USER VIA THE TTY AND SWITCH REGISTER TO 
DETERMINE xf THE USER HAS THE EXTENDED PRECYSION OPTION 


C) THE FRPe{2 DATA EXERCISER PROGRAN CONSISTS OF TWO SECTIONS, 
THE FIRST SECTION CONCESTS OF A SERTES CF FLOATING POINT 
ANO DOUBLE PRECISION TESTS AND THEIR ERROR CHECKS (FPPLOFPPIP), 
O00 NUMBERED Fepei2 TESTS ARE EXECUTED IN PLOATING 
POINT MODE USING RANDOM NUMBER YTASLE 1 AND RESULTING ARGUMENT 
TABLE 2, EVEN NUMBERED FPPel2 TESTS ARE EXECUTED IN DOUBLE PRECISION 
MODE USING RANDOM NUMBER TABLE 3 AND RESULTING ARGUMENT TABLE a, 
THE SECOND SECTION IS SIMILAR TO THE FIRST EXCEPY THAY THE FPP TESTS (FPP QQeFPP24) 
ARE EXECUTED IN FLOATING POINT EXTENDED PRECISION MODE WITHOUT 
SPECIAL HANDLING OF RANDOM NUMBER TABLES, 
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STARTING PROCEDURE FOR A PDPel2 COMPUTER 
THIS PRELIMINARY SET UP PROCEDURE IS CRITICAL AND ANY OMISSION 


SPO SHPO SPP SF FSEHSHTSHSHSSHVHOSVSSEBZ ASP SSFS*QToVSOVS PPC VssESsnguvegeeses 


WILL RESULT IN AN ERROR, 


SR aegrert eg eOeeasagageseaaggs 


A) SET THE RIGHT SWITCH REGISTER TO 0000 INITIALLY, 
B) SET THE MODE SWITCH TO BeMQDE 

C) DEPRESS 1/0 PRESET 

0D) DEPRESS START 20 


THE PROGRAM IS RUNNING AND OUTPUTS THE FOLLOWING SELF EXPLANATORY TTy MESSAGE, 


DEPRESS RSW<Sw> 5 IF 
YOU 90 NOT HAVE 
EXTENDED PRECISION MODE 
HIT KEY CONTINUE 


THIS INTEROGATION OCCURS ONLY WHEN THE PROGRAM 18 INITIALLY STARTED 
AND KEY CONTINUE STARTS THE PROGRAM RUNNING 


STARTING PROCEDURE FOR POPeS FAMILY 
THIS PRELIMINARY SET UP PROCEDURE IS CRITICAL AND ANY OMISSION 


SSH SSKVSCSSHSAITFCASSESSISSSCSTSHGV™SSSVIASHSVSCVIsP*Ss*SEsseCsere Sse Clos svesegrssa 


WELL RESULT IN AN ERROR, 


Sep Poe rere ee seas aeveFs Beeeea 


A) SET THE SWITCH REGISTER TO 0200 INITIALLY. 
B) DEPRESS THE LOAD ADORESS KEY, 

C) SET THE SWITCH REGISTER TO 0000. 

D) DEPRESS THE START KEY, 


THE PROGRAM IS RUNNING AND OUTPUTS THE TTY MESSAGE MENTIONED IN SECTION 4,2 


CONTROL SWITCH SETTINGS 


REW<ER> 0 8 1 THE FPPeji2 PROGRAM WILL HALT, 

RQW<SW> j z {| ERROR PRINT OUTS WILL BE SUPPRESSED, 

RSW<SW> § & 0 EXTENDED PRECISION opTtion 

RSW<SW> § we { NO EXTENDED PRECYSION OPTION 

RSWa<SW> & = | YHE FPPei2 PROGRAM WILL LOCK ONTO A PARTICULAR TEST SEGMENT, 
RSW<SW> Jejis 0 THE FPPej2 PROGRAM EXECUTES ALL TESTS SEQUENTIALLY, 

RSW<SW> Jeqis 7? THE FPPey2 PROGRAM LOCKS ONTO THE PARTICULAR TEST 


SEQUENCE SELECTED (1"24 OCTAL) IN THE SWITCHES 711, 
RESTRICTIONS 
THE FPPwi2 DATA EXERCISER PROGRAM MUST BE RUN IN FIELD 0, 


THE FPPej2 DATA EXERCISER WILL DESTROY THE LAST PAGE OF FIELD 0, 
THIS AREA JS VSEO AS A DATA BUFFER, 
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MESSAGE FORMAT 


THERE ARE YWO KINOS OF TELETYPE MESSAGES USED WITH THIS PROGRAM, 
THEY ARE? 


A) SELFeEXPLANITORY MESSAGES WHICH ALLOW THE USER TO MAKE A 
DECISION, 


B) ERROR INFORMATION TYPEQUTS, THESE ALL HAVE A STANDARD FORM 
AS FOLLOWS: 


FPP ERROR 
TEST XxX 


RAN NUM ARG 
EXP MSW LEW LSWi LEW2 LSWS 
MXXK MXKK KMKXK KXKXX KMKKX KARKK 


BAD RESULTING ARG 
EXP MSW LSW LSWi LSW2 LSWS 
MMXK XXMK MXKK KKK NRMK NAXX 


APY TABLE 
FLO FPC RQ BASE OPA EXP MSW LSW LSWi LSW2 LSWS 
MMMK XXKK XKKKX MKXK MAAK MAMM KKM MMMM MMR MMAK MKKK 


FPP INDEX REG 


TRO IRL IR2 IRB FRE TRS TRE IRF 
MMMX XXXKX XMXK XKXK MMM XNMM XMAK NNAK 


STATUS 
XXNX 


CONTINUE WITH TEST OR 
SET RSWeSW> © TO REEX FAIL ARG 


HIY KEY CONTINUE 





AT. 
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MAINTENANCE INSTRUCTIONS 


FPPe{2 MAINTENANCE INSTRUCTIONS ARE NOT USED IN THIS PROGRAM, 
MISCELLANIOUS 


PROVISIONS HAVE BEEN MADE TO INCLUDE THE FPP CODE CONTAINED IN TRE 

FPPei2 DATA EXERCISER PROGRAM IN THE MAINTENANCE MODE SIMULATOR PROGRAM TESY TRACE, 

THIS WILL ENABLE THE USER UPON FINDING A MALFUNCTION TO RUN THE YRACE 

DIAGNOSTIC THUS ISOLATING THE PROBLEM TO A TIME STATE WITHIN 4 MAJOR 

STATE, THE USER WILL HAVE TO TRANSPOSE THE RANDOM NUMBER ARGUMENT 

WHICH CAUSED THE FAILURE YO THE MAINTENANCE MODE SIMULATOR PROGRAM TO SIMULATE THE FAILURE 
EXACTLY, THIS IS NECESSITATED BY THE FACT THAT THAT THE MAINTENANCE MODE 

TEST RUNS AT A FACTOR OF AT LEAST 400 TIMES SLOWER, 


THE PROGRAM WILL RING THE YELETYPE BELL EVERY 100 OCTAL PASSES 
THROUGH THE PROGRAM, YHIS WILL OCCURE APPROXIMATELY EVERY 2 MINUTES, 


THE MAINTENANCE MODE SIMULATOR PROGRAM *TRACE" SHOULD ALSO BE RUN 
FOR A COMPLETE CHECKOUY OF THE FPPe12 PROSCESSOR, 
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4 FLOATING POJN? DATA EXERCISER 
/PBP#8 CODE STARTING LOCATION 202 


3 / 
4 /FLOATING POIN® SYMBOL TABLE 
5 / 
6 6554 FPINTs65514 
7 46554 FPHL 726554 
8 6553 FPCOMs6553 
9 6552 FPICL 36552 
12 6555 FPS726555 
44 6556 FPRS726556 
42 6557 PPIS?s6557 
13 2989 PEXI?sf202 
44 4902 FCLASe@882 
15 2809 FLOAsgage 
16 2903 FNEGsQ@Q3 
47 A904 PNORMa@oa4 
16 62090 FSTA86800 
19 1992 PADDsi #00 
20 5090 FADOMaSO0R 
24 2000 FSUBs2000 
rx4 41090 LOXs%1@o 
23 11499 SETX81480 
24 2800 JXNs2080 
25 11432 JSRe1i132 
26 1982 JEO84 008 
27 1939 JASIA3B 
28 1959 JLT24032 
29 1260 JGT81060 
$2 14948 JNE#{g42 
34 4049 ALN#e@ode@ 
32 2829 ATX 80920 
33$ 9939 XTASEGSO 
34 8940 FNOPegh4e 
35 2005 STARTF e028 
36 AVIS STARTOa2O06 
37 490g FMUL 24000 
38. 7092 FMULMs 7000 
39 3299 FOL Ve32o2 
42 7440 ADNXegi19 
44 6567 LSMFPs6567 
42 A989 STARTESOA5¢9 
43 6999 TABLE L 86200 
44 6409 TABLE26400 
65 7008 TABLES a 7000 
46 7422 TABLE487420 
47 
48 PMOODE 
49 
50 / 
34 /8 MODE {NTERRUPT POINT 
52 / 
53 M0ag aQ 
54 1900 8999 I, 


55 C044 3402 JMP yy eg 








JFLOATING POINT DATA EXERCISER OFALIS VEGS 2eAUGe72 7137 PAGE Lei 


36 
57 
36 
39 
40 
63 
62 


A982 


LR) 
AGES 
ABAD 
A986 
BOAT 


8910 
G@diLd 
8042 
8043 
944 
9049 
#946 
A847 


8820 
A924 


A922 
AR2S 
aged 


0029 
8026 
2927 
AGS 
AGS4 
8832 
A833 
aged 
A835 
FBS6 
AQ37 
AQ4e 
AO4) 


Agade 


‘e 7 


9204 


2888 
2000 
2908 
A989 
7908 


9818 
C020 
2088 
OP8B 
2080 
2988 
C982 
F900 
BOGB 


O02 
8424 
3529 


S808 
OO8D 
S982 


8825 
0982 
4980 
A038 
5600 
A280 
ABD 
OAD 
LT 
ARES 
ARAL 
AROS 
AVBO 
AGAR 


14543 


INTS 


/ 

/PROGRAM CONSTANTS 
/ 

ACSAVE, @ 

LSAVE, 4% 

INFXS, 4 

SAV, g 

NUM, a 


/ 
/PDP®S INDEX REGISTERS 
/ 


gs 
& 


Sa rman anr se 


/ 
/ 
/PROGRAM STARTS VIA LOC 20, 283, OR 489 
/ 


e228 
STARTS, JMP { ,%4 /gMP FO 
START /START OF PROGRAM 
/ 
/PROGRAM CONSTANTS 
4 
INPLAGs, 8 
STATUS, @ 
CNR, g 
/ 
/FLQATING POINT ACTIVE PARAMETER TABLE 
/ 
a25 
Ape, = B /FIELD BITS 
FPPY /FPC POINTER 
PPPIR “yR POINTER 
BASE /BASE REG POINTER 
a /OPERANG ADDRESS 
Ma Fac EXPONENT 
A /FAC MSW 
g APAC LSW 
g FAC LSwe 
a fFAC Sw2 
4) “FAG LW 
POINT, 28 
POINTD, B 


/ 
/PROGRAM CONSTANTS 


/ 
OF22FX, OF 22FP 


OO 














( 3 
. s 
/FLOATING POINT 
114 7943 
412 9944 
113 9945 
114 946 
445 
446 
117 
418 
149 9950 
429 e954 
124 0952 
122 eg33 
123 ag54 
424 7955 
425 e956 
426 4957 
427 
428 
429 
132 4968 
433 964 
132 e962 
433 8263 
134 #964 
435 Ag65 
456 2966 
437 4967 
438 8278 
439 gg74 
448 2972 
443 0873 
1442 9974 
443 ag75 
444 A076 
445 6277 
446 7499 
447 aye4 
448 94192 
449 G183 
450 ayaa 
453 ALAS 
152 A126 
433 0107 
454 91412 
455 iid 
436 A112 
4,37 143 
158 @144 
459 M415 
462 AL16 
161 A434? 
462 0422 
163 O121 
164 (422 


M425 


DATA EXERCISER 


1462 
2316 
0277 
3023 


0244 


OF 220X, 
CLLSW, 
AL VEX, 
SYsT, 


PJALi@ VOa3 


OF 220P 
CLLSWO 
AL TEXP 
STATUS 


2aAUGa72 7437 PAGE 122 


/ 
/FLOATING POINT INDEX REGISTERS 
/ 


a59 
FPP{R, 2@ 

g 

a 

4] 

g 

a 

a 

@ 
/ 
/GONSTANTS 
/ 
FptmD, 498 
FRAORS, APT 
PROG8, PROGSM 
LOKTS, LOKTST 
LOKSE, LOKSEG 
FPRCUR, 2 
FPPIN, PPPINT 
REER, REERR 
TSTHL, YSTHLT 
REENT, REENYTR 
OPT, DPTR 
PRINTR, PRINT 
OGCTALS,» OCTA 
UPLOW, UFLO 
RESULT,» RESLT 
ERRFPP, @ 
TSfi5, 2 
7S$¥46, 2 
EPMOPT, @ 
TYP, TYPE 
CRL, CRLF 
TBLds @ 
YBLS: a 
BELLs 8 
Kis Pf 
Key 2 
K3, 3 
Ka, 4 
KDB, 3 
KO, 6 
K7 4 7 
K1O, 12 
Kid, 14 
K12, 12 
KLS, 13 
K4q4, 44 


/{RO 
/YRL 
/{R2 
AIRS 
/YR4 
/{RS 
/1R6 
/3R7 


/CURRENY STARTING ADDRESS OF FPP FEST BEING RUN 




















FLOATING POINT SATA EXERE{SER OfAlaeg Veas 2eAUGa72 7437 PAGE 43 


466 @424 8845 K45, 45 
467 A425 G16 K4G6; 46 
448 0426 4847 Kd, 47 
169 0427 Agag KG, 20 
478 A432 O24 Kats 24 
473 4431 4922 K22, 22 
472 A432 2923 K23, 23 
473 0433 2824 K24, 24 
174 0434 8937 K37, 37 
479 01435 A042 Kad, 49 
476 6436 9077 K7F, 77 
477 4437 7482 KLEGs 198 
478 8=68442 9287 K207, 287 
479 444 Fe12 K242) 212 
486 = §=—6 442 BLS K2i5, 245 
484 #1443 9848 K240, 246 
482 0464 0409 K4BB 4 490 
483 0445 1009 Ki@e2, 41098 
484 0446 1288 K1202, 1288 
485 A147 2009 K29G2, 2089 
486 a43¢ 3749 K3740, 3742 
487 0494 4929 K4002, 49900 
488 0452 4199 Kai, 4192 
489 8183 8772 Ka772, 8772 
498 0484 8778 K59735, 3775 
49% 6455 5777 KS59777, 3777 
492 0496 6797 KO777, 6777 
493 0437 7489 K749B, 7408 
a%6 0160 7708 K79GO, 7720 
495 464 7795 M3, a3 
496 0462 7777 M1 al 


497 / 
498 AROUTINE FC 
499 /STARYT THE FPP 
408 / 
@84 0463 2008 FPPST; 2 /CONTAINS RET A00 
282 8464 1926 TAD AP?e, /ACESTARY OF NEXT PPP PST 
203 0465 3965 OCA FPPCUR /STORE ADD OF FPP ¥S* IN FPPECUR 
@B4 0466 6552 PPTCL /teQ PRESET TO FPP 
205 A467 1068 rAd FPEemMp /ACaLOC FPRCMD 
296 0479 68353 FRCOM /\.QAD PPP EMD REG 
e087 474 7380 CLA CLL /ACaD 
208 472 1064 FAC FPADRS /ACaAPT TABLE POINTER 
209 AG?3 6535 FPST AJL GAD ADRS REG AND STARY FPP 
24 O474 7402 iif /ERR » FPP RUN FLOP SE? 
eit 0475 7308 CLA CLL /ACaG 
aie 0476 5563 JMP tf FPPSY /RETURN TO PROGRAM 
/ 
244 G0 TO LOG STARTS 
245 8280 #220 
a n209 3029 JMP STARTS / JUMP FO LOC 28 
/ 
oe /INTERRUPT SAVE AC ROUTINE 
/ 
220 0204 3003 INTO, OCA ACSAVE /SAVE AC 





‘ 
{ 
\ e 
i 
Ry 
ae 


saan ilies mietnctnin me tm 


Saudi deta 5 erent 


am 


> 
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@24 
222 
223 
224 
225 
226 
227 
228 
229 
230 
e354 
232 
233 
234 
235 
236 
237 
438 
239 
648 
e434 
242 
g43 
244 
245 


2282 
2283 
7234 
7245 
7206 
9287 
4210 
G241 
A242 
4243 
A214 
#245 
#216 
4247 


2222 
9224 
%222 
9223 
e224 
4225 
8226 
#227 
e230 
231 
g232 
e238 
e234 


8235 
8236 
0237 
2240 
n264 
12462 
9243 
244 
1245 
246 
0247 
7282 
7254 
9252 
8233 
1256 
@255 
7256 
A287 
A262 


1890 
3295 
7012 
3204 
4220 
7390 
1205 
3829 
4004 
7004 
1228 
4244 
6004 
5409 


7380 
1959 
1112 
7459 
3264 
398g 
1065 
Liii 
3926 
1054 
3933 
S822 
46589 
1262 
6583 
7309 
1064 
6555 
7422 
562g 


TAD 2 

OCA INTX 

RAR 

OCA LSAVE 

JMS INSERY 
CLA CLL 

TAD INFX8 

OGA 0B 

PAD LSAVE 

RAL 

TAS ACSAVE 
RMF 

TON 

JMP too 


~ 


2eAlGe72 7137 PAGE 124 
/ACBLOC @ 

/SAVE 10C @ 

/ROTATE LING INTO ac BIT 2 

/SAVE LING 


/GO TO INTERRUPT SERVICE ROUTINE 
/ACeG 

/ACBLOC INYXS 

/RESTORE LOC @ 

/JACSLOE LSAVE 

/RESTVORE LINE 

/RESTORE AC 

/RESTORE MEMORY FILO 

/TURN ENVERRUPYS ON 

/RETURN FO PROGRAM 


/ 
AYNTERRUPT SERVICE ROUPINE 
/ 


INSERV, 2 
FRINT 
SKP 
JMS ! FPPIN 
"SF 
SKF 
JMP TPFR 
KSF 
SKP 
JMP KYBD 
JMP Y INSERY 
KYBO, WELT 
TRTR, Whe 


/ 
/REENTER FPP ROUTINE Af 


ASKIP ON FRPP INT 

ANO e@ SKIP 

/YES @e GO TO FRPIN ROUPINE 
/SKIP ON TTY PRINTER [NT 
ANOeSKIP 

/YESeGO YO TPTR ROUTINE 
/SKIP ON TTY KYBB EN? 
/NOeSKIP 


¢YESeGO FO KYBD ROUTINE 


/THIS PROGRAM BOFS NOT INIPIATE KYBD INT 
/THIS PROGRAM DOES NO? INIPIATE TRYR INT 


NEX? SEQUENTIAL POENT AFTER FAYLURE 


/JPRINT OUT ERRORS {F PRINT ENABLED AND ERROR QECURRED 


/ 
REENTR, CLA CLL 
FAD FPPIR 
TAD K4 
SNA 
MP RESFPC 
DCA FPPIR 
REE, FAD FPPCUR 
FAO K2 
OCA AP fet 
RE, FAD FPP Y Red 
OCA FPPIRs3 
QCA INFLAG 
PPICL 
FAQ FPEMD 
FRPCOM 
CLA CLL 
FAD FPAORS 
PPST 
HLT 


JMP | INSERY 


faced 

/AC@FPP IRE 

/INC BY ¢ 

/SKIP YF NOT LAST ARG IN FPP TST 
/SET WP NEXT FRPP TST 

/UPDATE FRPP {Ro 

/AGBADD OF CURRENT FPP TST 
/INC BY 2 
/STORE RETURN FPC IN APT#4 
/ACEFPP IR4 

/FPP IRSe TRY 

/CLEAR FPP INTERRUPT FLAG 
4/10 PRESEY 16 FPP 

/ACaLloe FPREmMO 

/|,,0A0 FPP Emo REG 

JACKS 

/ACBAPT TABLE POINTER 

/L0AD ADRS REG AND START FPP 
/ERReFPP RUN FLOP SET 
/RETURN TO PROGRAM 














/FLQATING POINT DATA EXERCISER PJALLe VOGS 2eAUGe72 7137 PAGE 185 


276 /HAVE TESTED LASY SET OF ARG 
277 /SET APTsi EQUAL To START OF NEXT FPP TESTe7 
278 / 
279 M264 73099 RESFPC, CLA CLL 
282 9262 1087 TAD NUM /ACGENUMBER OF FPP PST 
284 M263 1444 TAD K4ag /ADD 4%@ TO NUMBER OF FPP TST 
282 92646 3842 OCA 42 fa ¥O LOC 12 
283 g265 41442 TAD = 42 /ACSADO OF NEXY FRPP TST 
286 1266 1333 TAO K7974 /ABO «7 
285 9267 3026 OCA AP%e4 /STORE RETURN FPC IN APToi 
286 9279 5246 JMP RE /REeENTER FPP TEST 
287 
288 PRESENTER FPP ROUTINE RE@EXECUTING 
289 /SAME RANDOM DATA ARGS AS BEFORE 
298 / 
294 @274 7342 REERR, CLA CLL CMA 
292 9272 3464 OCA 1 = LQKSE 
293 9273 12854 TAO FPPIRed /ACaFPP IRE 
e96 9274 1462 FAD M4 /DECREMENT BY & 
295 9275 3654 O¢A FPPIRed /STORE BACK IN FPP IRY 
be 8276 3243 JMP REE /GO0 TO REsENTER ROUTING 
/ 
296 /THIS ROUTINE TS YSEO BY TEST 415 
299 /¥O ALTER RANDOM NUMBER EXPONENTS IN FABLE ¢ 
Jag /EVERY THIRO LOCATION IN TABLE 1 18 
ae /SET EQUAL TO LOC FABLE 4 
: / 
$23 e277 #e00 ALTEXP, @ /GONTAINS RETURN ABORESS 
3a4 @382 1332 FAD K7653 
$85 @394 S047 OCA 7. 4.00 47 8 7683 
36 a3@2 1455 TAS K5977 
307 9303 3044 Oca 44 /,0C 44 8 9777 
308 O34 1444 FAD — 44 
a9 2305 3944 DGA POINTD /POINTO # FIRS? NUMBER IN PABLE 4 
942 386 59L4 JMP ,o3 ASKEP 24 LOGATIONS | 
3a3 @yey 1044 FAD POINTD /AG # GONTENTS LOC TABLE 4 
$42 A310 3444 pca ft 44 /SET ALL OTHER EXPSNENTS UP SAME 
48 A344 2944 {$3 414 /tNG LOC 44 
14 8342 2014 $2 14 /ING LOC 44 
$415 93243 2847 {$2 ae /ING LOC 47 © $S [% ZERO 
346 0344 8397 MP /ANO © BO AGAIN 
os 0345 3677 JMP f ‘chew /RETURN TO T45 ROUPINE 
48 / 
349 / 
320 /ROYTINE USED IN DOUBLE Bret iaton MODE 
$24 776 CLEAR OUT LSW OF MANTYSS 
$22 / 
$25 4346 808 CLLSWD, 2 /CONTAINS RET ADO 
324 9347 1334 TAD K7608  /ACe7688 
$25 A320 3924 OCA ENFR /,0C CNTR » 7680 
326 M324 11456 TAD K6977 fa & 6777 
$27 A322 32844 DCA 11 AOC i4 3 6777 
328 A323 «7302 AG, CLA CLL faC @ & 
329 A324 2044 1$2 44 /INC LOC it 
332 M325 34644 pca tf 44 AGLEAR LOC IN FABLE 3 


Caen 


= ra Be 
/ \ 
\ } 
x \ fe 
a 


Athele asias in sinAenctietnam ate ear a 


Brett te FY soe MMe 


toe SS, Haaser a ate ETS ee, 


( \ 
\ ¥ XS 


/FLOATING POINT DATA EXERCISER OJALI@ VOO3 2eAUGe72 7137 PAGE 196 
334-9326 «2024 1S2 CNTR /ARE WE DONE 
332 "327 5323 MP AG /NO @ DO [¥ AGAIN 
$33 33D 45746 JMP ~  CLLSWO /RETURN 
334 


4 / 
335 03314 7608 K7600, 7680 
336 A332 7683 K7653, 7653 
337 A333 7774 K7774, «7774, 


338 / 

339 /GO TO ,0C STARTS 

340 / 

344 a4e¢ 409 

342 492 3220 JMP STARTS 

343 VEELOTTSS 

344 /SERVICE OF ALL FPP INTERRUPTS 

$45 /HANDLED IN THE SUCEEDING SECTIONS 

346 SAELTSSS 

349 / 

348 /FPP TEST EXECUTION LIST 

349 /EXPECTED EX! POINTS 

352 /TYPICALLY #9 GOMPLETION OF A PARTICULAR 
354 /FPP TESY WITH NO @RRORS LEAVES 

552 /THE FPC POINTER IN THE APY TABLE POINTING 
353 /¥OQ THE SYARY OF THE NEXT FPP TEST 

354 / 

355 0492 a482 

336 S482 4822 FRP2 

357 2403 4949 PPPS 

358 0404 4964 FPP4 

959 2485 4449 FPPS 

962 9406 41436 FPP6 

943 B487 4363 FPP? 

362 0448 4222 FPP6 

$4635 444 4252 PPP14 

564 9442 4382 FPPi2 

365 A443 4332 FPPAS 

366 0444 4364 FPPY4 

$67 B415 4444 FPPLS 

368 A446 4446 FPPL6 

949 M447 4476 FPP 17 

378 1429 45926 FPP2o 

e74 2424 4546 PPPed 

972 9422 4601 FPP22 

373 0423 4642 FPP23 

374 M424 4666 PPP26 

575 2425 64745 FSET 

376 / 

977 /FPP [NTERRUPT TO ¢P 

378 / 

379 0426 2282 FPPINT, @ /CONTAINS RET ADD 
389 0427 7349 CLA CLL CMA /ACBIFI7 

a4 4432 3222 OCGA INPLAG /FLAG PROGAM THAT PPP HAS [NTERRUPTED 
382 9434 6559 FPIS? /READ FPP STATUS AND SKIP YF INT REG FLAG SET 
5B3 8432 7492 Wf /eaFPP TOT MALFUNCPTIONs={OF FPRST RESET FPP INT REG FLAG 
584 A433 3623 OCA STATUS /DEPOSIT IN LOC STaTus 


$85 A434 1007 FAD NM /GET THE ROUTINE NUMBER BEYNG EXECUTED 











/FLQATING POINT DATA EXERCISER DIJALIO 


386 
$87 
388 
389 
390 
394 
992 
393 
94 
g95 
396 
3597 
398 
399 
402 
404 
482 
483 
4n4 
4a5 
426 
407 
428 
429 
412 
444 
413 
415 


@435 
4436 
A437 
44g 
2444 
#442 
9443 
9444 
8445 
446 
A447 
1499 
64534 
94832 
2433 
A4as4 
9455 
0436 
44657 
4469 
PAad 
A462 
8463 
2464 
8465 
R446 
4467 
A47Q 
A674 
#472 
A473 
a4a74 
8475 
A476 
A477 
A589 
a5a4 
582 
A5GS 
ASG4 
ASa5 
A506 
ASAT 
A542 
A544 
A542 
S43 
asd 
asq5 
ASL4 
A547 
AS2G 
A524 
A522 
4523 


oe 


4444 
3242 
1442 
7844 
1226 
765g 
5626 
7604 
4335 
7044 
1335 
7639 
5467 
4733 
4023 
7689 
5732 
1228 
4336 
7649 
3265 
1475 
7646 
52585 
1823 
4138 
7442 
4727 
1823 
4437 
7449 
4730 
1823 
A334 
7449 
4734 
1977 
7639 
5474 
4473 
2489 
4007 
0427 
7649 
3320 
1967 
7049 
7632 
5329 
4724 
3324 
4725 
4726 
4504 
5479 


TAD 
OCA 
TAD { 


CMA Tae 


TAD 


SNA CLA 


JMP f 
Las 
ANO 
cya 
FAD 


SNA CLA 


JMP f 
JMS } 
TAD 


SNA CLA 


JMP I 
FAD 
ANO 


SZA CLA 


JMP 
FAD f 


SZA CLA 


JMP 
rad 
AND 
SZA 
JMS f 
Tad 
ANO 
SHA 
JMS f 
TAQ 
ANO 
Sea 
JMS 
TAD 


SNA CLA 


JMP | 
JMS } 
TX42 
FAD 
AND 


SZA CLA 


JMP 
TAD 
RAR 


SZ CLA 


JMP 
wMS | 
JMP 
JMS 
JMS 
JMS 
JMP 


Wh DM Qoay corey 


V3 


K48Q 
12 
{2 


APT ot 
FPPINY 
K2042 
K2048 


REER 
TE 
STATUS 


TSTEX 
STATUS 
KS733 


1o4 
UFLOW 
xs 


STvaTus 
K4¢ 


EXPUND 
STaTus 
Kiag 


EXPQVR 
STATUS 
Keee 


FRAQVR 
ERRFPP 


REENT 
PRINTR 


NWM 
K24 


12? 
NUM 


» #8 
DPOCT 
,*2 
FPOCT 
APFIRO 
CRE 
TSPHL 


2eAUGe72 7137 PAGE 1e7 


JADD 4000 70P OF EXPECTED EXIT FABLE 
/DEPOSIT IN LOC 42 
/GEY EXPECTED EXIT ADDRESS FOR PARTICULAR ROUTINE 


/COMPARE WITH FPP BXIT POINT CONTAINED IN APY TABLE 


/WAS AN EXPECTED EXIT CONTINUE WITR PROGSM 
/SW RES ?0 AC 

Mask BFS 4 AND 6 

/COMPLIMEN?T AND INE 

AAQD 2848 . 
/IF AC & @ REENTEReNO TYPEOUTSsLOCKED ONTO SEGMENT 
AREYURN TO TEST 

/ARE WE EXECUTING PES? NUM 15 OR 16 

GET S¥arys 

/JP ZERQesPROBABLE DATA ERROR 

/DATA ERROR 


/MASK OUT BP EPM AND UNDERPLOW BIvs 
/TP NON@ZERQ EXAMINE STATUS 


/DJO FPP PROGRAM SET UNDERPLOW FLAG 


/NOWDAFA ERROR 

/EXAMINE STATUS WORD 

/BIT 6eFPP EXPONEN? UNBERFLOW 
/tS i? Set 

/Y¥ESeGO TO EXPUNG ROUTINE 
/EXAMINE STATUS WORD 

/BLY SeFPP EXPONEN? OVERFLOW 
fis Y? Sef 

/¥ESuaGO TO EXPOVR ROUTINE 
/EXAMINE SFATUS WORD 

/BIT 4eFPP FRACTION OVERPLOW 
iS yf ser 

/YFSeGO TO FRAOVR ROUTINE 
/ERROR FLAG 

/JS yt Sef 

/NQ @ RETURN 

AYES @ PRINT 

/FPP ERROR 


/aAli TESTS ABOVE 22 ARE FPM TESTS 
/{S YF AN EPM FEST 

AYES 

fNO 

JTF 1S A DOUBLE PRectSfon FEST 
“IP THE LING & @ 

ANG eFPM FEST 

AYES @ QOUBLE PRECISION 


/FLOAFING POINT MOBE TEST 
/PRIN?T APT IR, AND STAPUS INFO 


4GO TO TSTHLY ROUTINE 


, eee 
[ i. 


Ne Hi 
f 
Sout 





a~ a a, : ‘ 
Mee a : 
JFLOATING POINT DATA EXERCISER DJAL4a VOO3  2sAUGe72 7137 PAGE 108 


44) / 

442 9524 20957 OPOCT, OPOCTT 
443 2525 2062 FPOCT, FPOCTT 
a44 1596 2209 APTIRO, APTIR 
445 0527 264g EXPUND, EXPUN 
446 4832 7642 EXPQVRy EXPOV 
447 PSB 4624 FRAQVR, FRAQV 
448 ASI2 1243 TSTEX, TSTEX] 
449 4533 1056 TE a TES 
459 9534 20g K202, 2082 
454 8535 2946 K2040, 28428 
452 4536 3733 K3733, 3733 


453 / 

454 / 

455 /PPP EXPONENT UNDERFLOW STATUS FLAG SET 

456 / 

437 8680 #682 

456 9682 29990 EXPUN, @ /CONTAINS RET ADD | 

459 AQAL 4663 JMS | FPPT /STORE ADD OF RAN BATA ARG IN LOC POINT 
462 4602 1475 TAD { UPLOW /AC#eLOC UFLOW 

464 4683 7649 SZA CLA /SKIP IF PPP RESET? LOC UFLOW 

462 9684 569g UMP] EXPUN  /NOmEXPONENT UNDERFLOW WAS EXPECTED 
463 7685 7342 CLA CLL CMA /aCe7777 

464 7686 3475 OCA { UFLOW /SET YP UFLOW FLAG 

465 8687 734g CLA CLL CMA /ACA7777 

466 6648 39977 DCA ERRFPP /SEYT ERRFPP FLAG 

467 (641 3629 JMP f EXPUN /RET TO PROGRAM 

468 

469 / 

rie /FPP EXPONENT OVERPLOW STATUS FLAG SET 

473 / 

47@ 4642 28888 EXPOV, @ /CONTAINS REF ADO . 

473 9643 4663 JMS 1 FPPT STORE ADQ OF RAN BATA ARG IN LOC POINT 
474 0644 1449 TAD $ POINT /AGCSEXP OF RAN DATA ARB 

475 645 1147 FAO K2606 A/INC BY 2682 

476 9646 7804 RAL /BIT @ OF AG TO LINK 

477 S647 7636 SZ, CLA /SKIP IF BIT ef | 

478 629 5642 JMP f EXPOV /NO#EXPONENT OVERFLOW WAS EXPEGTED 
479 0621 7340 CLA CLL CMA /AC8I777 

482 9622 3077 O¢A FRREPP /SET ERRPPP FLAG 

484 9623 8642 JMP } EXPQOV /RET FO PROGRAM 

482 

483 / 

484 /FPP FRACTION OVERFLOW STATUS FLAG 

485 / 

486 1624 agog FRAOV, @ /CONTAINS RET ADD 

487 A625 4472 JMS 1 DP? /STORE ADDRESS OF RAN BATA ARG IN L0C POINT 
488 1626 1442 TAD } POINT 

aag A627 3844 OCA POINTO /MOST SIGNIFICANT PART OF BATA ARG 
499 A630 1404 FAD TS#16 /aC = CONTENTS LOC TSTT6 

494 9631 7649 SZA CLA /SKIP IF NOT TEST 46 

492 2632 5664 JMP ? FRAL6 /DETERMINE JF A LEGITAMATE FRACTION OVERFLOW OECURED 
493 7633 1897 TAO NUM /AGBFPP TST NUM 

494 0634 7844 CYA /GOMP AND {ENC 


495 "635 1448 FAD K 4 /AOD 4 


























/FLOATING PQINT 


496 
497 
498 
609 
502 
54 
282 
288 
$06 
505 
926 
507 
508 


2636 
4637 
2649 
2644 
%642 
"643 
2646 
9645 
1646 
A647 
2630 
7654 
#682 
1633 
26594 
4655 
#656 
2657 
2669 
A664 
8662 


9663 
8664 


4968 
4984 
1682 
4985 
1904 
4985 
1996 
1987 
1618 
294% 
1942 
1843 
i944 
£845 
1846 
4347 
1022 
192% 
1222 
1823 
1924 
1925 
1926 
1927 


ae 


DATA EXERCISER DALIe 


7659 
5245 
4227 
7044 
14124 
7642 
5269 
1044 
7904 
7439 
5255 
7804 
7638 
5624 
5260 
7984 
7620 
5624 
7348 
3077 
5624 


1983 
1299 


1862 
1946 


3345 
1444 


FOV, 


/ 
FPPT, 
FROLS, 


/ 


/ 
FROAVLG, 


SNA 
JMP 
TAO 
cya 
TAD 
SZA 
JMP 
TAD 
RAL 
SZ 
JMP 
RAL 
SZ, 
JMP 
JMP 
RAL 
SNL 
JMe 
cA 

CA 
Me 


CLA 


CLA 


CLA 


I 


FPPYR 
PROVi6 


/ 

/THTS ROUTINE YS USED WHEN A 

/FRACTION OVERFLOW OR UNDERFLOW OCCURES IN 
/YEST 46 TO DETERMINE {F ACCEPTABLE 


#1202 


FAD 
OCA 
PAD 
NGA 
FAD 
OGA 
TAD 
OGA 
FAD 
RAL 
Sal, 
CLA 
OCGA 
TAG 
RAL 
SNI, 
JMP 
TAO 
SNA 


CLA 
CLL 


CLA 


CLA 


JMP | 


CLA 
Fad 
FAQ 
$zZl, 


CLL 


CLA 


VEaS 
1*6 
NUM 
Ki2 
FOV 
POINTD 


»*5 


FRAOV 
FOV 


FRAQV 
CMA 
ERRFPP 
FRAOV 


POINT 
é 


SAV4 
POINTD 


CMA 
ML ENC 
SAV3 


POSNST 
MLINC 
FO 


SAV2 
SAV4 


ZeAUGa72 7437 PAGE 199 


ASKIP IF IF IS NOT FPP TST 4 
/NOeWAS FPP TST 4 

/ACSFRP TST NUM 

/COMP AND LINC 

fad 12 

/SKIP IF J? 1S FPP TS? 12 
/NOwl? JS NOT FPP TST L2eERR 
/ACSMSW OF OATA RES 

/ROTAYE aC BIT O INTO LINE 
/SKIP TF LINGSE 

/NO 

/ROTATE AC ue @ INTO LING 
/SKIP YF LINCee 

/JNOMEXPECTED QVERFLOWSREY FO PROG 
/YESeERROR 

/ROTATE BIF @ INTO LINE 
/SKIP TF LENG NOTe@ 

/RET FA PROGAM 

fACa7777 

/SET ERRFEPP FLAG 

/RET FO PROGRAM 


/AGC @ CONTENTS LOG POINT 
/LOG 44 POINTS YO RANDOM ARGUMENTeS 


/,0C SAV2 8 SEGOND ARGUMEN? 
f,0¢ SAVS s TFHYIRO ARGUMENT 


/L0C SAV4 @ FOURTH ARGUMEN? 
f/aG w FIRS? ARGUMENT 


/SET SIGN INDICATOR 


/POSITIVE NUMBER 


/e,e NUMSeeERROR 
fe, NUMS 
/DETERM INE IF UNDERFLOW £S LEGAL 


f \ 

\ 
\ } 
.- of 


Ema sa , ect aca i 





Cy 
/FLOATING 


554 
552 
553 
554 
555 
556 
557 
558 
559 
56D 
564 
962 
943 
564 
565 
566 
967 
568 


POINT 


12938 
1834 
12032 
4233 
1234 
1235 
1236 
1237 
1240 
124) 
1242 
42435 
1044 
1265 
1246 
4047 
4230 
1054 
1232 
1933 
1954 
4955 


1856 
4237 
1962 
4263 
1962 
1263 
1264 
1965 
4066 
4947 
4972 
1074 
1072 
1075 


41074 
4275 
1276 
1977 
1420 
4140] 
1492 
£198 
4194 


DATA EXERCISER OJALLO 


1440 
1044 
1345 
7004 
7630 
5742 
5254 
1343 
7649 
3742 
7908 
1344 
1346 
7639 
1412 
1044 
4345 
7004 
7629 
5742 
5655 
2687 


Agoe 
1007 
7044 
1424 
7650 
7349 
3400 
4087 
7044 
1425 
7652 
7342 
3404 
5636 


LY: 
4473 
Sait 
4473 
34124 
4473 
S075 
4473 
5834 


TAO 

FAD 

TAQ 

RAL 

SZ. CLA 

JMP 

IMP 
POSNST, TAO 

SZA CLA 

JMP f 

CLA CLL 

TAD 

YAD 

SZ, CLA 

FAQ 

TAD 

FAD 

RAL 

SNL CLA 

JMP | 
OK, JMP f 

POVed 


V2O8 


Ki 
POINTO 
SAV3 


FQ. 
i*t 


2eAUGeal72 7437 PAGE 1018 


JERR YF LINC = 4 
7ERROR 


/a,* NUMS#sERROR 
fo, NUMS 
/DETERMINE IF OVERFLOW IS LEGAL 


7ERR [F LINC 8 @ 

/ERROR 

7A FRACTION OVERFLOW WAS EXPECTED 
/RETURN 


/ 

/TWIS ROUTINE IS USED ON AN ERROR 
/¥O DETERMINE YF JF ORIGINATED 
/IN TEST 45 OR 16 


/ 

Tes, 8 
FAQ 
CyA 
FAO 
SNA CLA 
CLA CLL 
BGA 
TAQ 
CiA 
TAO 
SNA CLA 
CLA CLL 
OCA 
JMP f 


NUM 
KL 
CMA 
TS?415 
NUM 
Ki6 
CMA 


TSF16 
TES 


/RETURN ADORESS 

JAC =» NUM OF TES? BEING EXECUTED 
/SKIP SF NOY TEST £5 

AOC 7ST 45 8 CONTENTS OF AC 

/kC = NUM OF TEST BEING EXECUTED 
/SKIP YF NOT TEST £6 


AOC TST 46 8 CONTENTS OF AC 
ARETURN 


/ 

/FHTS ROUTINE REQUIRES OPERATOR INTERVENTION 

/JONCE AT THE BEGINNING OF THE PROGRAM FO COMMUNICATE TO THE 
/PROGRAM JF AN EPM FPPei2 1S BEING TESTED 


/ 

STMES, @ 
wMS f 

X33 


7X54 
JMS | 
7X52 
WMS f 
TX45 


PRINTR 
OL 

PRINTR 
PRINTR 


/RETURN ADDRESS 

/PRING 

/OQEPRESS RSW <SW> 8 IF 
JMS |] PRINTR /PRIN? 
/Y¥OW DO NO? HAVE 

/PRINT 

JEXTENDED PRECISION MODE 
/PRINT 

/AIT KEY CONTINUE 




















/FLOATING POINT 


1495 
£1496 
1497 
1112 
$441 
1it2 
£1145 
4114 
4415 
1146 
£147 
1429 
1421 
14122 
$125 
£124 


1284 
1202 
1243 
13n4 
L2A5 
1226 
1287 


+ 


DATA EXERCISER DIALde Vees 


4504 
4504 
7402 
7606 
4437 
3102 
1402 
7949 
5337 
635¢@ 
6553 
4134 
6367 
7300 
6556 
AILS 
7948 
5337 
4493 
2732 
4473 
2778 
4394 
4504 
7402 
5220 
65532 
7328 
5676 


2668 
SGA0 
C008 
M088 
BRAD 


4284 
4267 
4347 
435% 
4404 
9026 
5252 
5972 


FPPMOD, 


/ 

FQ, 
MLEINC, 
SAV2: 
SAVS,s 
SAV4: 


UMS | 
uMS 
MLT 
LAS 
ANO 
HCA 
FAD 


$24 CLA 


MP 
FPICL 
FPCOM 
PAG 
LSHFT 


CLA CLL 


PPRST 
AND 


SZA CLA 


JMP 
JMS 4 
7X37 
JMS 1 
TX4Q 
JMS 3 
JMS j 
HLT 

JMP 

FPICL 


CLA CLL 


dMP 
FOV 

g 

g 

2 

p 


/ 
SILI 
/QATA ERROR HANDLER 
/ENTERED PROM PPPINT ROUTINE 
SLPS 
/ 


CRL 
ERL 


Kidd 
EPMOPT 
EPMQPT 


FPPMOO 


K4g90 


K4 


FPPMOD 
PRINTR 


PRINTR 


CRU 
CRL 


STARTS 


STMES 


2ehUGe7e2 7137 PAGE ieii 


/SET RSWESWOTF NO EPM AND RIT KEY CONT 
/READ SW REG 

/MASK 

/SET OR CLEAR EPM FLAG 


“SKIP JF EXTENDED PRECISION FPPei2 
/NO 

/ZERO THE FPP WORLD 

/LOAD FRPP COMAND REGISTER 

WITH 4982 | 

/SET EPM MODE 


/READ FPP STATUS REGISTER EFNTO ac 
/MASK 

/18 FPP EPM STATUS BIY SE? 

/YES 

/PRINFG 

/EPM STATUS BI? NQF SEP 

/PRIN? 

/KEY CONT TO RESTART TEST 


/HLT FOR OPERATOR INTERVENTION 
ARESTART 
EERO FPP WORLD 


ARETURN 


/ 
/EXPECTED DATA ERROR EXITS 
/TYPICALLY@eTHE FPG IN THE AP? TABLE 
JPOJNTS YO THE EXIT POLNT#d 

/FHE FOLLOWING IS a LIST OF SAME 


4 


eL204 
GQLI 
6042 
6043 
6044 
RET 
FOPAS4 
FOMPMD 


f 
ts 


1 
e 
1 1 
\ . ; 





VO8S 


a 


2eAUGe72 7437 PAGE 1212 


/ 

/THUS TABLE CONTAINES A LIST OF THE 
/ZADDRESSES OF BATA ERROR HANOLING SUBROUTINE 
/TYPICALLY EACH DAPA ERROR EX{T POINT 

/HAS [TS ASSOCJATED ERROR ROUTINE 


/ 
/THIS ROUTINE PESTS FOR EXPECTED DATA ERROR EXITS 
/LYISTEO IN THE TABLE STARTING AT LOG 2864 

/ 


/CONTAINS RET ADD 

/dCe1288 

/,0C 4234208 »© START OF FPP EXPECTED ERR EXITS 
/aC87757 

/,,0C C¥87757 

/ACSADD OF EXPECTED FPP ERR EX{T 

/COMPLIMENT AND INC 

/ADO FPC EX}Y IN APT TABLE 

/SKIP YF AC NON@ZERC 2 CLR AC 

/DETERMINES CORREC® ERROR ROUTINE ; 
JING LOC Cf AND SKIP YF ALL ERROR EXITS TSTED 
/YST NEXT EXPECTED ERR EXIF POINT 

JNOT AN EXPECTED EXIT OF ANY TYPE 


/FOUND AN EXPECTED ERROR EXIT 


1 

/FLOATING POINT DATA EXERCISER OLALIZ 
664 14242 5133 FZMD 
662 42414 9143 FCPL7 
663 4212 5156 OPSET 
664 4243 8275 NPCPRY 
665 42144 5322 FPSET 
666 1245 5335 ECPRY 
667 42146 5344 ECPRAS 
068 4247 8377 FCPRMO 
669 4220 5474 EZMD 
670 4224 5472 FND 
O74 
972 
673 
974 
975 
676 / 
077 4222 1279 FP AQM 
678 4223 1304 DPAOM 
679 4224 1329 FRMLM 
682 4225 1334 OPMLM 
684 4226 1352 FPCPR 
682 1227 1350 FPCPR 
983 4232 1359 FRCPR 
984 423i 13958 FPCPR 
985 4232 1355 rFEMMT 
686 4233 41389 PPCPR 
687 1234 1489 DPCR 
686 1235 1488 OPER 
989 4236 1352 FROPR 
692 4237 1332 FPOPR 
694 4242 1495 EFPCPA 
692 $244 1408 FRCPA 
69S 4242 1442 PYTT, E2MDE 
694 
695 
696 
997 
698 / 
699 4243 e908 TSTEX], 2 
782 4244 1446 TAD 
7284 4245 30842 OCA 
782 4246 1364 FAD 
783 4247 3365 OCA 
724 4252 1442 GO, TAD ! 
705 42354 7944 CIA 
746 4252 1026 TAD 
707 4253 7689 SNA CLA 
728 4254 53269 JMP 
729 4255 2368 1S2 
742 4236 063252 JMP 
743 42357 74@2 HL? 
712 / 
7438 
744 


/¥H~S ROUTINE LINKS THE ERROR WITH ITS 
/APPROPJ ATE ERROR SUBROUTINE 























AFLOQATING POINT 


746 
737 
748 
719 
720 
724 
722 
723 
724 
725 
726 
727 
728 
729 
730 
734 
732 
738 
734 
735 
736 
737 
738 
739 
749 
744 
742 
743 
744 
745 
746 
747 
748 
749 
739 
734 
782 
753 
754 
755 
736 
757 
758 
789 
768 
764 
762 
768 
764 
765 
766 
767 
768 
769 
778 


1242 
1264 
1262 
1263 
1264 
4269 
1266 
1267 


CATA EXERCISER OJALI@ VBS 
AVIA TABLE STARTING Af LOC i222 


1365 
7284 
1366 
3267 
4667 
3267 
5667 
2908 


4473 
24892 
4767 
4473 
2666 
4504 
4442 
4473 
2707 
4304 
4774 
5479 


4473 
2433 
4778 
4473 
2666 
4594 
4443 
4473 
2707 
4504 
477% 
5479 


4 

DTERs TAD 
Tac 
FAQ 
BCA 
FAD f 
nea 
JMP f 
Z 


/ 


cr 


KT?T 

#4 
128 
12 

vad 


2eAUGe72 74337 PAGE 1e13 


/ACe toe Cf 

INC 

/ADD KITT @ POINTS TO BOTTOM OF ERR SUB LIST 
DEPOSIT [N ,+#4 

/GET adD OF ERR SUB OUT OF LIS? 

/DEPOSIT IN ,¢2 

/GQ TO ERR SUB 

/JCONTAINS AD® OF ERROR SERVICE ROUTINE 


/ 
ji ERRQR SERVICE ROUTINES 


VPPP4 TEST DATA ERROR 
/FADOM AND FADO RESULTS OFFER 


7IN FLOATING POINT MODE 


/FMEY SHOULO BE EQUAL 


/ 
FPADM, Ws { 
TXd2 
JMS 
JMS 
PX34 

JMS 


PRINTR 


FPOCTS 
PRINTR 


eRL 
OF 22F x 
PRINTR 


CRL, 
APPR 
TSPHL 


/ 
/FPPL2 TEST DATA ERROR 


/FAQOM ANQ FADD RESULTS 


/PRING 

/FPP ERROR 

/ROUTINE OUTPUTS ERR INFO 

/PRING 

/FADOM RESULT? 

/CARRIAGE RE? AND LINE Feed 

/ROUTINE PRINTS OFPSEY 22 OF BASE REG 
/PRINF 

/FADD RESULT 

/CARRIAGE REF AND LINE Peed 

/ROUTINE PRINTS CONTEXTS 5p FPP APY TABLE ANO —R REGS 
/ROUTINE FSTS SW REG 


DSFFER 


/{N DOUBLE PRECISION MODE 
/TWEY SHOULD BE EQUAL 


/ 

OPaAQM, JMS f 
7X42 
JMS 3 
JMS f 
X34 
JMS f 
JMS | 
JMS f 
7X38 
JMS ] 
JMS f 
JMP f 


PRINTR 


OPOCTS 
PRINTR 


CRL 
OP 220% 
PRINTR 


CRI 
APFIRG 
TSPHL 


/ 
/FPPIS TEST BATA ERROR 


/FMULM AND FMUL RESULTS 
/IN FLOATING POINT MODE 


/TWEY SHOULD BE EQUAL 


/PRINT 

/FPP ERROR 

/ROUTINE OUTPUTS ERROR INFO 

/PRIN? 

/FADOM RESULT 

/CARRTAGE RET AND LINE FEES 

/ROUTINE PRINTS OPFSE? 23 OF BASE REG 
/PRING 

/FADD RESULT 

/CARRTAGE RET AND LINE FEES 

/ROUTINE PRINTS CONTENTS OF FPP APT TABLE AND {~R REGS 
/ROUTINE FSIS SW REG 


DIFFER 


~ an 


fF 


/FLOATING POINT DATA EXERCISER DJALIG VOBS 2eAUGa72 7137 PAGE i014 
774 / 
772 4322 4473 FPMLM, JMS | PRINTR /PRINT 
773 4321 2499 ¥X12 /FPP ERROR 
774 4322 4767 JMS { FRACTL /ROUTINE OUTPUTS ERR INFO 
775 1323 4473 JMS ! PRINTR /PRIN? 
776 1324 2745 7X35 /FMULM RESULT 
777 4325 459764 wMS CRL /CARRYAGE RET AND LINE FEES 
778 1326 4442 JMS |} OF22FX /ROUTINE PRINTS OPPSEF 29 OF BASE REG 
779 4327 4473 JMS } PRINTR /PRINY 
7aQ 4339 2724 7X36 /FMUL RESULT 
784 4331 4504 JMS 3 CRL /CARRJAGE RET AND LINE FEES 
782 4332 4774 JMS ] AP?#IRY /ROUTINE PRINTS CONTENTS OF FPP APT TABLE AND IR REGS 
783 4333 5479 JMP f TSPHL /ROUTINE FSTS SW REG 
784 / 
785 /FPPL4 TEST BATA ERROR 
786 /PMULM ANQ FMUL RESULTS DIFFER 
787 /IN OOUBLE PRECISJON MOOE 
re /YWEY SHOULD BE EQUAL 
/ 
790 4334 4473 OPMLM, YMS J PRINTR /PRINT 
794 4335 2499 7X42 /FPP ERROR 
792 4336 47979 JMS ! OPOCTi ROUTINE OUTPUTS ERROR INFO 
798 4337 4473 JMS | PRINTR /PRINF 
7904 1342 2745 7X35 /FMULM RESULT 
795 4344 4504 JMS } CRL /CARRJAGE RE? ANDO LINE FEED 
796 4342 4443 JMS OF92DX S/ROUTINE PRINTS OFSET 22 OF BASE REG 
797 1343 4473 yMS } PRENTR /PRIN? 
796 4344 2724 7X36 /FMUL RESULT 
799 4345 4504 JMS ! CRL /CARRIAGE RET AND LINE FEED 
gee 4346 4774 JMS } AP?IRG /ROUTINE PRINTS CONTENTS OF FPP APT TABLE AND IR REGS 
ape 1347 3479 JMP f TS#H, ROUTINE PSTS SW REG 
80 / 
8B3 /DATA ERR §N FLOATING POIN? MQDE 
8H4 /RAN NUM ARG JN TABLE1 NOY @ RESULT IN TABLE2 
ee /THEY SHOULO BE EQUAL 
88 / 
807 14392 4473 FPCPR, JMS { PRINTR /PRIN? 
828 4334 24089 X42 /FPP ERROR 
829 4392 4767 JMS { FPACTY, /ROUTINE QUTPUTS ERR INFO . 
612 4353 4774 JMS f AP#IR{ /ROUTINE PRINTS CONTENTS OF FPP APY TABLE AND IR REGS 
pe 4354 3479 wMP f TSPHL /ROUTINE FSTS SW REG 
84 / 
815 /EXPONENT UNBDERFLOW IN TES? 17 
844 /PRINT ERROR JNFORMATIAN 
815 / 
646 4355 4473 F2MMT, JMS ~ PRENTR /PRINT 
$47 1336 249¢ 7X42 /FPP ERROR 
848 4357 4473 JMS ! PRINTR /PRINT 
849 4342 3962 TX54 ZILLEGAL FPP EXP WYFLO 
822 43464 4767 JMS ! FPACTY ROUTINE QUTPUTS ERROR INFO 
G2) 4362 4774 JMS ? APPIRY ROUTINE PRINTS AP® TABLE, FPP TR AND STATUS DATA 
ee 43463 5472 JMP ! TSPHL AROUYINE FESTS SW REG 
82 / 
824 13464 7757 M24, e2t 
625 1365 agag CT, 4 














/FLQATING POINT DATA EXERCISER ODO[ALG2 


826 
627 
828 
829 
830 
834 
832 
833 
B34 
435 
936 
837 
838 
539 
a4g 
B44 
g42 
843 
644 
B45 
B46 
847 
646 
gag 
650 


£346 
1367 
13572 
4374 


1488 
£404 
4482 
1483 
4484 


4485 
1486 
4487 
4442 
4444 


4442 
1445 
£444 
4445 
1446 
4447 
4422 
£424 
4422 
4429 
1424 
4425 
4426 


1427 
£490 
4434 
41432 
4435 
1434 
1435 
1436 


C) 


1242 
2088 
2057 
2298 


1490 
4493 
2400 
4733 
4734 
4227 


4904 
4473 
324g 
4473 
3842 
4594 
4473 
3034 


KTTT, PYTT 

FROCTL, FROCTT 
APACTL, OPOCTT 
APFIRI, APY IR 


VO8S 


2ehUGe72 7137 PAGE 1e15 


/ 
/DATA ERR IN DOUBLE PRECISION AQDDeSUB OR MULeDIV TEST 
/RAN NUM ARG IN TABLES NOT & RESULT IN TABLES 


/FHEY SHOULO BE 


/ 
#1428 
OPCR, JMS f 
X42 
JMS { 
JMS f 
JMS 


EQUAL 


PRINTR 


OPeCcT2 
APFIR2 
TSPHL? 


PRIN 

/FPP ERROR 

/ROUTINE OUTPUTS ERR INFO 

/ROUTINE PRINTS CONTENTS OF FPP APY TABLE AND fR REGS 
JROUTINE TSTS SwW REG 


/ 
/DATA ERROR [N EXPENDED PRECISION MODE 
/RAN NUM ARG NOY 8 RESULTING ARG 


/THEY SHOULO BE 

/ 

EPEPA, JMS | 
¥Xd2 
JMS f 


JMS | 
JMP 


EQUAL 


PRINTR 


FROCT2 
APP IRE 
TSPHLT 


/PRINT 

/FPP ERROR 

/ROUTINE QUTPUTS ERR INFO 

/ROUTINE PRINTS CONTENTS OF FPP APT TABLE AND IR REG 
/ROUTINE TESTS SW REG 


/ 
/EXPONEN? OVERFLOW OR UNDERFLOW IN EPM MULP/BIV PEST 
/TEST TO DETERMINE IF LEGEFAMATE 


/ 

EZMQC, JMS 
CLA CLL 
TAQ f{ 
SPA 
JMP 
Tao 7? 
SPA 
JMP 
JMP 
TAD } 
SMA CLA 
JMP f 
JMP 


PPPTR 
POINT 


,o3 
POINT 


REENT 
EPCPA 
POINT 


REENT 
EPGPA 


COMPUTE ADDRESS OF RANDOM DATA ARG 


4aG o RAN EXP 
/SKIP TF AG POSITIVE 


/AG @ RAN EXP @ RAN EXP 
/SKIP IF AG POSITIVE 
/LEGITAMATE OVERFLOW 
/ERROR 

#AC @ RAN EXP & RAN EXP 
/SKJP YF AC NEGATIVE 
ALEGITAMATE UNDERFLOW 
/ERROR 


/ 
/TEST SWITCH REGISTER TO DETERMINE 
/}F ERROR $$ TO BE IGNORED 


/OTHERWISE HALT 


/ 

TSTHLTs JMS J 
JMS 
7X47 
uMS | 
7X44 
JMS | 
JMS | 
TX45 


CR 


PRINTR 
PRINTR 


CRL 


PRINTR 


ACARRITAGE RE? ANO LINE FEED 

APRINT 

/CONTINUE WITH TES? OR 

/PRING . 

/T0 RE@EXCUTE FAILING ARG MUST DEPRESS SW 7 IN Sw REG 


/PRINT 
AMET KEY CONTINUE 
fo ( ie | 
! we 


\ 
\ i? 
Rey at 


2 edd tetinietenentedaant nnn = 


f ’ 


\ j ; 

/FLOATING POINT DATA EXERCISER OfALL4@ Vaas 2ealGel72 7137 PAGE 1016 

884 4437 45294 JMS } CRE /CARR{AGE RET AND LINE FEES 

882 1442 7422 HLT /WALT FOR OPERATOR INTERVENTION 

B83 4444 7604 LAS 4SW REG TO ac 

884 1442 2435 AND K43 /MASK BI? 6 

885 4443 765g SNA CLA /SKIP YF NONeZERO 

886 1444 3474 JMP f REENT ACONTINUE WITH FPP TS? 

887 4445 3977 OCA ERRFPP 

888 14446 7349 CLA CLL CMA /ACBI777 

gag 1447 3464 Oca ! LOKSE /FLAG TO FPP w» LOCK ON?O TST SEGMENT 

892 4459 34467 JMP f REER /REENTER FRPP YST 

894 / 

892 /THIS ROUTINE PRIN?S THE CONTENTS OF 

895 /OFFSET 22 OF BASE REG TABLE IN F P MODE 

894 / 

§95 4451 209 OF 22FP, 8 /JCONTAINS REF ADO 

896 4482 4473 JMS ! PRINTR /PRINT 

897 4453 2675 TXS2 /OFFSET 22 BASE REG 

896 1454 4478 JMS } PRINTR /PRING 

a99 4495 2434 7X47 /EXP MSW LSW 

990 1496 1976 FAO RESULT /ACBPOINTER 70 OFFSE? 22 

GAY 4487 4734 JMS ! OCwO4 

9a2 44460 7775 o3 

923 1444 3654 JMP $ OF22FP /RET ¥O PROGRAM 

926 / 

985 APHIS ROUTINE PRIN?S THE CONTENTS OF 

926 /OFFSET 22 OF BASE REGISTER IN D P MODE 

G07 / 

928 44462 8909 OF220P, @ /CONTAINS RET ADO 

929 4443 4473 JMS } PRINTR /PRIN? 

942 144464 2695 7X32 /OFFSEY 22 BASE REG 

94d 4465 4473 JMS 1 PRINTR /PRINF 

912 4466 2489 7X29 /MSW LSW 

945 4467 1076 FAQ RESULT? /AC#POINTER TO OFFSET 22 

944 4479 7004 rac /INC a 

945 4474 4734 JMS } OCwOs 

94 14472 7776 oy 

94 4473 5662 JMP f OF220P /REY TO PROGRAM 

946 / 

949 /YSED IN DOUBLE PRECISION MODE 

920 /GCOMPUTES ADM OF RAN NUM DATA ARG 

924 /ANOD STORES {N LOC POINT 

922 / 

923 4474 800g OPFR, ‘4 /CONTAINS RET ADD 

924 1475 7302 CLA CLL 

925 4476 1084 TAD FPPIReq /IRZSNUM OF 2 WORD ACCESSES MADE 

926 4477 1954 FAD FPPIRed /1R1 © [RO 

927 4592 1332 TAD K6976 /AODD START OF FABLES a2 

928 4501 3942 OCA POENT  /POINTER TO FPP RAN DATA ARG 

929 4502 5674 JMP 1 OPfR /RET %0 PROGRAM 

932 / 

934 /WSED IN FLOATING POINT AND EXTENDED PRECISION MODES 

932 /COMPUTES DIRECT ADDRESS OF RANDOM DATA ARGUMENT 

933 /AND STORES JN LOCATION POINT 

934 / 

935 1583 909 FPPTR, 28 /CONTAINS REY AOD 


a 














FLOATING POINT OATA EXERCISER OLALIG VOGS 2ah4UGe7e2 7137 PAGE 1017 


936 15@4 7362 CLA CLL 

937 4585 1987 FAO NUM 

938 4576 8127 AND K26 

939 4507 76598 SNA CLA /SKIP YF EPM TEST 

942 4542 8322 JMP HERE /NOT EPM TEST 

944 4541 1887 TAD NUM 

942 4542 2118 AND K4 

948 4543 76352 SNA CLA /SKIP IF EPmM TEST USES TABLE 1 
944 4544 1145 TAD Kidde /A0D 4908 FO UPDATE POINTER TO TABLES 
945 1845 1153 FAD K5972 /POINTS TO TABLE 106 

946 4546 1254 TAD FPPIRet /JNC UP THROUGH TABLE FO ARGUMENT 
947 4547 1053 FAd FPPTReqd /ETC 

946 4522 1934 FAO PPP] Red 

949 1524 5323 MP 2#2 /EPM FEST 2@ 50 3 MORE 

959 4522 11564 RERE, TAQ K59775 

954 4523 1054 Fad FPPIRed SINC UP THROUGH TABLE 70 ARGUMENT 
952 4524 1954 FAD FPPIRed /ETC 

933 4525 1851 FAQ FPP IRe 4 

954 4526 3949 Oca POINT /POINTER FO FPP RAN BATA ARG 

955 4527 S783 JMP Y FPPTR ARETURN 


/ 
957 4530 6776 K6776, 6776 
956 4534 2243 OCWOL, OCWOS 
939 4532 2909 FROCT2, FROCTT 
962 4533 2937 OPOCT2, DPOCTT 
963 4534 2209 APTIR2, APTIR 


962 / 
96S APHIS ROUTINE USED IN PLOATING POINT MODE AND EPm 
964 /PRINYS THE TEST NUMBER WHICH FAILED 
965 /¥WE RANDOM NUMBER ARGUMENT OR ARGUMENTS USER 
ee JAND THE INCORRECT RESULTING ARGUMENT 
/ 
968 2200 “2008 
949 2902 908 PROCTTs @ ACONTAINS REF AOD 
979 2984 4327 JMS O¢ AROUTINE ALTERS TEXT SPATEMENT 493 
974 2092 4473 JMS {  PRINTR SPRINT 
972 2083 2405 X43 STEST XX 
973 2004 4504 JMS CRE /CARRYAGE RE? ANDO LINE Fees 
974 2985 4473 JMS } PRENTR /PRINY 
975 2gM6 2442 7X45 /RANOOM NUM ARG 
976 99A7 4473 JMS { PRINTR /PRINT 
977 2049 2434 7X47 /EXP MSW LSW . 
978 2944 4754 JMS } FPPTS STORE ADD OF RAN GATA ARG IN LOC POINT 
979 9942 19907 TAD NUM 
989 2043 427 ANO Kee 
984 2014 7642 SZ4 CLA /SKIP YF NOT AN EPM PEST 
982 2@45 1464 TAQ M3 
983 2046 1164 FAD M3 
984 2047 3224 DCA FP /,0C FPL = CONTENTS OF ac 
985 2g2@ 1224 TAD Fg 
986 2024 3254 OCA FP AOC FP2 8 CONTENTS OF AC 
987 29292 1042 TAD POINT /AGBPOINT & ADD OF DATA ARB IN TABLE 1 
988 2923 4752 JMS { O¢wO2 “PRINT 
989 2924 peg FP4, a /OCTAL WORDS 


998 2925 4594 JMS f CRL oe. 
es a 
( J i i (> 


i 


= i, 
4 
; ‘ 

' 


Benne MaRS UAT AE 


ie peal ath 


So 
/FLOATING POINT OAYA EXERCISER DIALLO V0a3 2eAlGa7e2 7137 PAGE 1218 
994 2026 4524 JMS } CRE 
992 2027 1498 TAD TSf15 
993 2232 7659 SNA CLA ASKIP YF EXECUTING TES? 45 
994 2231 5244 JMP SKIP 
995 2932 4473 JMS PRINTR /PRINY 
996 2033 3983 TX5Q ARAN NUM ARG 2 
997 2034 4473 JMS } PRENTR /PRINT 
998 2935 2434 7X47 /EXP MSW LSW LSWi LSW2 LSwWS 
999 2036 1412 TAD K3 
4090 2037 1242 TAD POINT 
1004, 2949 4752 JMS ] OGCwO2 /PRINF 
4222 2944 7775 oS 43 OCTAL WORDS 
4093 2042 4504 JMS} CRL 
4204 2943 4524 JMS Y CRE 
4205 2244 4493 SKIP, JMS ! PRINTR /PRINT 
4026 2945 2429 7X46 /INCORRECT RESULTING ARG 
4097 2946 4473 JMS 1 PRINTR /PRINT 
1008 2047 2434 7X47 /EXP MSW LSW 
4929 20509 7382 CLA CLL /ACaD — 
1012 2954 1648 Fao POINT /ACBADD OF DATA ARG [N FABLE 4 
4044 2082 1144 ar Ys) kK4ag /A0D 402 @ ACBADD OF INCORRECT RESULT IN TABLE 2 
4042 2283 4782 JMS 3 OCwO2 /PRINT 
4213 2084 aga9 PR2, g /QETAL WORDS 
4044 2935 4594 JMS ? CRL 
rey 2236 5688 JMP { FRACTY /REY FO PROGRAM 
404 / 
4047 /THIS ROUTINE USED IN DOUBLE PRECISION MOOR 
4048 /PRINTS THE TEST NUMBER WHICH PAILED 
4049 /THE RANDOM NUMBER ARGUMENT? USED AND 
eH /TWE JNCORRECT RESULTING ARGUMENT 
40 / 
4822 2037 8282 DPACTT, 2 /CONTAINS RET ADD 
4223 2069 4327 JMS O¢ /ROUTINE ALTERS YEXT STATEMENT 13 
4024 2041 4473 JMS | PRINTR /PRIN? 
4¢25 2062 2405 7X48 “VEST XxX 
4226 2863 4594 JMS | CRL /CARRYAGE RET AND LINE FEES 
4227 2064 1987 TAD NUM 
4026 2065 7949 RAR 
4929 2946 7632 SZ CLA /SKIP IF NOT A DOVBLE PRECISION TEST 
1030 2267 5687 JMP } DPOCTT 
4034 2270 4473 JMS } PRINTR SPRING 
4032 20714 2442 7X45 /RANBOM NUM ARG 
4035 2072 44473 wMS ] PREINTR /PRINT 
1034 2973 245¢ 7X20 /MSW LSW | 
1235 20974 4472 JMS f OPF /S¥ORE ADO OF BATA ARG IN LOC POINT? 
4036 2975 1942 TAO POINT  /AG@ADD OF DATA ARG IN TABLE 3 
4037 2276 4782 JMS } OCwo? 
4038 2977 7776 Bh 
{239 2489 4594 JMS } ai /CARRJAGE RET AND LINE FEED 
4042 2404 1401 TAD TS716 
4244 2192 7652 SNA CLA /SKIP YF EXECUTING TST 416 
4242 2403 5344 JMP ett 
14043 2494 4473 JMS PRINTR /PRINT 
4044 2495 3953 7X52 /RAN NUM ARG 
4945 21476 44973 JMS { PRINTR /PRINT 

















FLOATING PQINT 


4246 
4047 
1248 
gag 
4256 
4253 
4252 
4953 
4054 
4935 
4056 
4657 
£956 
4059 
4268 
4064 
4262 
4869 
4364 
4045 
4066 


2487 
7142 
21ii 
2442 
2413 
2444 
2445 
2146 
2447 
2422 
9424 
2422 
2423 
2424 
2425 
2426 


DATA EXERCISER OJAL42 


2452 
1444 
1048 
4752 
7776 
4504 
4473 
2429 
4473 
2459 
7398 
1649 
1444 
4752 
7776 
3657 


2aaQ 
ARAL 
4ba4 
4473 
2455 
4473 
2462 


7X29 
FAD 
TAO 
JMS ] 
a2 
JMS 3 


JMP ft 


VOGS 


K2 
POtNT 
OCWDe 
CRL 
PRINTR 
PRINTR 
POINT 
K4a8 
OCwD2 


DPOCTT 


2eAUGeve 7437 PAGE 1019 


AMSW LSW 


/PRINT 
42 OCTAL WORDS 


/PRING 

/INCORREGT RESULTING ARG 

/PRING 

/MSW |SW 

/aCad ee, Ben 

/ACBADD OF DATA ARG IN TABLE 3 | 
/ADD 48GeACeA0D OF [NCORRECT RESULT IN TABLE 4 


“RET FO PROGRAM 


/ 
/THIS ROUTINE ALTERS TEXT STATEMENT 15 
/$0 THAT TME TEST NUMBER {S CORRECT 


/ 
OCs 


/ 
FPPT4, 
OCcwO2, 
FXYSA, 
K6G, 


My 

CLA Clb 
Fad 

ANS 

TAD 


OCA 
FAB 


FPPTR 

AgcHwos 

XL 343 
62 


KO8 
SAV 
NUM 


K?7 
K68 


SAV 
*X¥¢3a 
O¢ 


/CONTAINS REY ADO 
/AC86 

/AGBNUM OF FPP TST 
/MASK LS OCTAL GHAR 
/CONVERT FO aSCt! 
SAVE [7 

AAGSNUM OF FPP TSF 
/AROTATE 2 RIGHTS 
/ROFATE 4 RIGHT 
/MASK MS OCTAL CHAR 
/GONVERT FO aS@it 
/GLEAR LING 

ARGOTATE 2 LEPFT 
/ROTATE 2 LEFT 
AROVATE 2 LEFF 
COMBINE 

/ALTER TEXT STATEMENT 43 
/RET FO PROGRAM 


/ 

ATHIS ROUTINE §S YSEO BY BOTH OP AND FP MQDES 
4760 OUTPUT THE CONTENTS OF THE ACTIVE 
/PARAMETER ANO INDEX REGISTER TABLES 


/ 
APTIR, 


#2208 
, 

JMS f 
JMS } 
X24 
JMS f 
¥X22 


CRL 
PRINTR 


PRINTR 


/CONTAINS RET ADD ; 
/CARRIAGE RET AND LINE FEES 
/PRINT 

/APT PABLE 

SPRINT 

/PORMAT FOR APY TABLE DATA 


cite 
aS 


—_ 
f 
C 


a 


J 


r~ 


\ 


/FLOATING POINT 


L424 
4422 
1443 
404 
1195 
1406 
4497 
$426 
1409 
4112 
4414 
tite 
1445 
4444 
4445 
4416 
1447 
4438 
4449 
1428 
442) 
tiee 
1425 
1424 
4425 


2206 
2207 
2210 
2241 
2242 
2243 
2244 
2245 
2246 
2247 
2220 
22e4 
Peace 
2228 
2224 
2225 


2241 
2242 
2243 
2244 
2245 
2246 
2247 
2250 
2254 
2252 
2235 
2254 


2255 
2256 
2257 
2262 
22614 
2262 
2248 
2264 
2265 


DATA EXERCISER 


1007 
1427 
7642 
1464 
1372 
3246 
1064 
4244 
apne 
4524 
4594 
4473 
2946 
4493 
eoan 
1345 
42414 
1779 
4504 
4594 
4473 
2662 
1846 
4244 
7777 
4504 
5602 


S089 
1142 
3044 
16441 
3245 
7389 
1444 
4474 
2045 
5246 
2241 
3644 


CLL 
7300 
1655 
3006 
2255 
1406 
A462 
7442 
5270 


AP, 


OT AL 


TAD 
AND 
SZA 
YADd 
TAD 
DCA 
TAD 
JMS 
§ 
JMS 
JMS 
JMS 
X25 
wMS 
7X24 
TAD 
JMS 
«16 
WMS 
JMS 
wMS 
TX32 
FAD 
JMS 
oi 
JMS 
MP 


12 


CLA 


{ 
! 
I 


! 


I 
I 
I 


} 
} 


V28S 


NUM 
Kea 


M3 

M12 
AP’ 
FPADRS 
Ocwos 


CRL 
CRL 
PRINTR 


PRINTR 


K5a 
OCwWOS 


CRL 
CRI 
PRINTR 


S*StT 
OCWwOS 


CRL 
APFIR 


a 


2ehlGat2 7137 PAGE 1922 


/SKIP YF NOY AN EPM TEST 


/SET WP NUMBER OF GENERAL WORDS OF OUTPUT 
/ACSADD OF APY TABLE 

/PRING 

/OCTAL WORDS | 
/CARR[AGE RET AND LINE FEEO 
/CARRYAGE RET AND LINE FEES 

SPRING 

/FPP INDEX REGISTERS 

/PRING 

/FORMAY FOR FPP INDEX REGISTER DATA 
/ACaSA OF FPP INDEX REGISTERS 


/CARRIAGE REY ANO LINE FEES 


/PRINY 

/STATUS 

/ACGADORESS OF LOG STAarUSs 
/PRINY 

/OQETAL STATUS WORD 


/RET ¥0 PROGRAM 


/ 
/TMIS ROUTINE IS USED TO OUTPUT 
/CONTINUOUS MEMORY LOCATIONS IN OCTaL 


/ 
OCWOS, 


‘ 

TAD 
OCA 
TAD 
OCA 
CLA 
a0 
JMS 
{$2 
JMP 
1S2 
WMP 


CLL 


I 


Mi 

44 
OGWDS 
45 

44 
OCPALS 
45 

184 


OcwOs 
OCwOS 


ACONTAINS RET ADD 
/SUBYRACT 1 FROM AC 
/,0C 44eA0Ded OF DATA 


AOC {5a0e48 

/AGBDATA ARG 

/QUTPUT 

/SKIP TF DONE & WORDS 
/NO@AGAIN 


/REY TO PROGRAM 


/ 
/ROUTINE YO PRINT OUT CONTENTS OF A PARTICULAR TEXf TABLE 
/ 


PRINT, 


‘ 
CLA 


CLL 


TAD }{ 


DOA 
1Sz 
TAD 
AND 
SZA 
JMP 


I 


PRINT 
SAV 
PRINT 
SAV 
K77G0 


103 


/GONTAJNS RETURN JMP ADDRESS 15 POINT OF ENTRY 


/GEY TEXT POINTER 


/INC RETURN JMP ADORESS POINTER 
/GET WORD FROM TEX? TABLE 

/MASK BITS O25 

/ACHO 

ZYPSeWE ARE QOQNE 














AFLOaTING PQOLNT 


$496 
4457 
4456 
1459 
1462 
4464 
1462 
1163 
4464 
4365 
4466 
4467 
4466 
4469 
43472 
$473 
4472 
4475 
4474 
4475 


2266 
2267 
2276 
2271 
2272 
2273 
2274 
2279 
2276 
2277 
2998 
2584 
2582 
2383 
23584 
2585 
2386 
23A7 
2319 
23ii 
2312 
2345 
25i4 
2345 
2316 


2347 
2326 
23923 
2322 
2925 
2324 
2325 
2326 
2327 
2338 
23534 
2332 
2338 
2334 
2335 
2336 
2337 
2348 
2344 
2542 


2343 
2344 
2345 


oe 


DATA EXERCISER DJALLé 


4504 
5635 
7529 
7029 
7084 
7042 
7842 
7042 
4343 
7380 
1406 
8436 
7449 
5306 
4504 
5655 
1450 
7390 
1452 
4443 
4343 
7309 
2806 
5262 
7482 


JMS ] 
JMP } 
SMA 
eM, 
tac 
RTR 
RFR 
RIR 
JMS 


CLA CLE 


YAO ! 
ANO 
SZA 
JMP 
JMS } 
JMP 
Pad 
SMA 
FAD 
TAD 
JMS 


CLA CLL 


1$2 
JMP 
HL? 


VOG3 


eR. 
PRINT 


TYPE 


SAV 
K77 


123 


CRL 


PRINT 
K394¢ 


K4468 
K24 
TYPE 


SAV 
PRINT#S 


2salGe72 7137 PACE 1824 


/CARRIAGE RET ANDO KLINE FEEO 
/REY ¥O PROGRAM 

/SKIP ON NEGATIVE aC 
/NO@COMPLIMENT LING 

ZINC at 

/ROVATE 2 RIGHT 

/ROTATE 2 RIGHT 

/ROTATE 2 RIGHT 

ATYPE 

/aCag 

/GET WORD FROM YEX? TABLE 

‘MASK BITS 601% 

/ACe@ 

AYES@eWE ARE QONE 
/CARRIAGE RET AND LINE FEES 
/REY ¥0 PROGRAM 

/ADD 3743 FO AC 

SKIP GN NEGATIVE AC 

ANGwADD 4448 TO AG 

/ADO 24@ FQ AG 

/¥¥PE 

ACHE - 
JING LOC Sav FO POENT TO NEXT ARG JN YEXT TABLE 
/OUTPUT NEX? WORD FROM TEX? TABLE 
/SHOULD NEVER GET HERE 


/ 
/THIS ROUTINE OUTPUTS CONTENTS OF AG 
/JN OCTAL 


/ 
OCA: 


/ 
/THIS ROUTINE TYPES ONE 
/ 


FYPES 


) 

RF, 
ATL, 
BGA 
TAD 
OCA 
Pao 
ANO 
FAO 
JMS 
rAd 
RTL, 
RAL 
DC a 
(Sz 
JMP 


Cha CLL 


Fao 
JMS 
JMP 


6 
Th? 
Ch A 


SAV 
M4 
COUNT 
SAY 
K7 
K26@ 
TYPE 
SAV 


SAV 
COUNT 
3 edi 


K2ag 
TYPE 
OCrA 


/GONTAING RET ADD 
AROTATE 2 LEFT 

AROTATE 2 LEFT 

ASAVE 4G QUTFUT 

ANGI) 

/L,0C GOUNT eed 
AACBOUPPUY 

“MASK BITS Gadd 
/CONVERT FO aseli 
“QUTPU? ON TTY 
/ACBOUTFUT 

/ROTATE 2 LEFT 

AROTATE 4 LEFTY 

ASAVE AC QUTPUT 

/BQNE 

/NOeDO ANOTHER CHARACTER 
fYFSaACe@ 

/AC2268 

/QUTPUT A SPACE TQ TTY 
/REYT ¥0 PROGRAM 


CHARACTER 


/JCONTAINS RE? ADO 
/AE FQ PRINTERSCLR FLAG 
/ACae 


———, 


a 
‘a 


\ 
ee 4 


a 





a, ar, am, 


/FLOATING POINT DATA EXERCISER OJALIa Vee3 2eaUGe72 7137 PAGE 1922 


eit 2346 8044 TSF /SKIP TF FLAG SET 
{212 2347 5346 JMP 14 /walt 

12135 2352 4942 TCF /CREAR FLAG 

1214 2534 5743 JMP | TYPE /REYT FO PROGRAM 
42415 / 

4216 /THIS ROUTINE YSSVES 3 CARRIAGE RETURNS 
4217 7AND A LINE FEED 

4218 / 

4319 2352 4208 CRLF: = B /CONTASNS REF ADD 
1220 2353 732 CLA CLL /aACae 

4224 2354 11442 rad K245 /AC8245 «@ CARRIAGE REF 
4222 2355 4343 wMS TYPE /QUTPUT 

4223 2336 1142 TAD K2i5 /AE3215 @ CARRIAGE REF 
4224 2357 4343 JMS TYPE /OUTPUF 

4225 2360 11441 rAd Kade /ACs242 e LINE FEES 
1226 2364 4343 wMS TYPE /QUTPUPT 

4227 2342 6942 ror /CLEAR FLAG 

$228 2363 5752 JMP { CRLF /REY 70 PROGRAM 
4229 

4230 / 

4233 / 


4232 2364 A009 COUNT, @ 
4233 23465 1959 KSB, 30 
4234 2346 8269 K268, 268 
1235 2367 7774 M4, o4 
4236 2370 7772 M10, #30 
4237 / 
4238 /PRINY TEXT STATEMENTS 
4239 / 
4248 2400 #2402 
4243 2400 %§22 TXi23 TEXT ?PPP ERROR? 
2484 2942 
2482 %522 
2483 2247 
2484 2209 
1242 2405 2485 TX455 TEXT PPEST XX ? 
2486 2324 
2487 4942 
2442 3932 
2441 4882 
4243 2442 2204 TX45, TEXT FRAN NUM ARG? 
2443 1642 
2444 16425 
2445 1549 
2446 8422 
2447 8708 
4244 2420 M2A4 TX469 896 TEXT 7BAD RESULTING ARG? 
2424 a449 
2422 2205 
2423 7325 
2424 1424 
2495 1446 
2426 8742 
2427 = AL22 
2430 A702 











/FLOATING POINT DATA EXERCISER 


4245 2434 8539 PX475 
2432 2049 
2433 4945 
74634 2327 
2435 49049 
2436 1428 
2437 2746 
2448 4944 
2444 23927 
2442 6449 
2443 1423 
2444 2762 
2445 4944 
2446 2327 
2447 6302 

4246 2439 1323 YX223 
2454 2742 
2492 4814 
2453 2327 
2454 4909 

4247 2485 9429 TX245 
2456 2449 
2457 2404 
2469 @244 
2464 4589 

4248 2442 8614 TX22¢ 
2463 2449 
2464 4906 
2465 2883 
2466 4249 
2467 i422 
2478 60946 
2474 4002 
2472 8423 
2473 0549 
2474 1728 
2475 8449 
2476 4995 
2477 S$@29 
2509 4949 
259% 1528 
2582 2742 
2585 4844 
2584 2327 
25835 4949 
2546 1423 
2507 2764 
2542 4944 
2541 2827 
2542 6249 
2543 1423 
2544 2763 
2545 4009 

4249 2546 8622 X23, 
2547 2842 


DJ4Lie Veas ZeAUGe72 7(37 PAGE 12023 


TEXT 7EXP MSW LSW LSWL LSW2 LSWS? 


TEXT 7MEW LSW FP 


TEXT PAPT FABLE? 


TEXT 7FLO FPG %&IR@ BASE OPA EXP MSW LSW 


TEXT 7FPP INDEX REG? 


LSwi LSwW2 LSWS ? 


/FLOATING POINT DATA EXERCISER OJALio Vea 2wAUGe72 7137 PAGE 1024 


4252 


4254 


1252 


2520 
2524 
2522 
2523 
2524 
2525 
2526 
2527 
2530 
2534 
2532 
2533 
2534 
2535 
2536 
2537 
2549 
2544 
2542 
2543 
2544 
2545 
2546 
2547 
2539 
2554 
2582 
2553 
2554 
2585 
2536 
2557 
9549 
9564 
2562 
2543 
2564 
2545 
2566 
2567 
2578 
2574 
2572 
2573 
2574 
2575 
2576 
2577 
2609 
26A4 
2692 
2603 
2604 
2605 
2686 


1116 
2495 
3249 
2205 
274g 
1422 
604g 
4044 
2264 
4949 
1422 
6242 
4044 
2263 
4949 
1122 
6449 
4044 
2265 
4049 
1422 
6642 
4944 
2267 
4952 
1447 
4342 
6162 
4924 
1445 
2549 
1725 
2485 
5506 
2822 
4904 
1404 
4946 
1724 
4923 
1745 
2944 
A524 
a54g 
2405 
2324 
4999 
13285 
5449 
347 
1624 
14146 
2525 
4927 
1144 


X24: 


TX25,4 


¥X26, 


TEXT 


TEXT 


TEXT 


7}Ro %&YR4 IRA IRS [R4 {RB [AB IR7 ? 


7L0C 18 TIME OUTeeFPP OD NOY COMPLETE YEST ? 


QKEY CONTINUE WILL INITIATE A CPU FORCED EXIT ? 

















4255 


4254 


1255 


4256 


2687 
264123 
2644 
2642 
27643 
2644 
2645 
2616 
2647 
2629 
2624 
2622 
2623 
2624 
2625 
2626 
2627 
2630 
2634 
2632 
2633 
2634 
2635 
2636 
2637 
2649 
2643 
2642 
2643 
9644 
2645 
2646 
2647 
2650 
2684 
9682 
2683 
9684 
2655 
2656 
2657 
2669 
2641 
2662 
2663 
2664 
2645 
2666 
26479 
2672 
2674 
2672 
2473 
2674 
2675 


© 


1442 
1146 
1124 
1491 
2495 
4004 
4903 
2025 
4206 
1722 
8305 
2449 
A539 
1424 
4902 
0629 
204g 
1225 
4,697 
5555 
1629 
1844 
2449 
1447 
2449 
Aa4di 
3449 
1647 
2449 


4086 
8604 
5404 
1549 
2205 
2325 
1424 
42n0 
1786 


1X27 


VX32. 


XSi: 


TxXSea 


/FILQATING POINT OATA EXERCISER OLALLG VRGS 


TEXT 


TEXT 


TEXT 


TEXT 


2aAUGe72 


FPP WUNGweFPHLT TOT DIO NOT INITIATE A CRY FORCED EXIT ? 


STATUS 7 


7FADOM RESULT ? 


?OFFSET 22 BASE REG ? 


7137 


PAGE 1025 


~ 


~™ 
ae, 





Ba alse, odes, 


Ta Gy Ridnnetren enema meeinlidelelnalinmnete ine ot 


ao 


/FLQATING POINT 


$257 


4256 


1259 


4260 


2676 
2677 
270¢ 
2704 
2702 
2743 
A7TA4 
9705 
O76 
2707 
27412 
27414 
2742 
2743 
2744 
2745 
2746 
2747 
2720 
2724 
2722 
27238 
2724 
2725 
2726 
2727 
2739 
27314 
2732 
2738 
2734 
2735 
2736 
2737 
27402 
2744 
2742 
2743 
2744 
2745 
2746 
2747 
2752 
2754 
9782 
27853 
2754 
2785 
2786 
2787 
2749 
2744 
2762 
2763 
2764 





DATA EXERCISER 


2623 
2524 
4962 
6242 
7274 
2305 
4922 
A509 
490g 
1604 
0424 
4022 
9523 
2544 
2409 
645 
2544 
1549 
2205 
2325 
1424 
4000 
8615 
2544 
4922 
1593 
2544 
2409 
544 
2442 
4522 
4934 
1725 
4904 
1742 
1647 
2449 
1004 
2605 
4924 
1908 
4905 
2045 
4947 
2924 
1447 
1649 
1722 
4004 
4223 
2404 
2425 
2340 
2522 
2247 


7X3Ss 


Tx35, 


¥x36, 


X37. 





DYALIB 


TEXT 


TEXT 


VEXT 


TEXT 


V2AS 2eAUGe72 7437 PAGE 1826 


7FADD RESULT? 


PFMULM RESULT ? 


?FMUL RESULT? 


VEL THER YOU 00 NOT HAVE THE EPM OPFION OR A STATUS ERROR OCCURRED 7 





/FLOATING POIN? OQATA EXERCISER 


4263 


1262 


$265 


4264 


4265 


2765 
2766 
2767 
2779 
2774 
2772 
2793 
2774 
2795 
2776 
2797 
392g 
3geay 
3g02 
3988 
sga4 
3905 
3286 
3007 
3912 
$Bi4 
Sdig 
Seis 
3944 


2240 
17a8 
2325 
2222 
a5n4 
4949 
1814 
2449 
1325 
3148 
347 
1624 
4924 
17492 
e205 
2324 
0422 
2442 


X42, 


X44, 


7X45, 


X47. 


TX35Be 


OUALAe 


TEXT 


YEXT 


TEXT 


TEXT 


TEXT 


V8aS evAUGe7e 7437 PAGE 1027 


?HIT KEY CONT YO RESTART TEST ? 


@SET RSWCSW> 6 RESEX FAIL ARG ? 


PHIT KEY CONT ? 


PCONTINUE WITH TEST OR? 


FRAN NUM ARG 2? 


—_ 
- 


a 


/FLOATING POINT 


4266 


4267 


4468 


1269 


4272 
4274 
1272 
4273 
4274 
4275 
1276 


3g54 
3g55 
3956 
3a89 
3242 
Sga4 
3262 
3263 
$264 
3g65 
$g66 
3967 
3a72 
3g74 
S272 
39738 
Sg74 
3975 
3976 
3977 
3129 
$144 
$482 
3193 
3404 
$445 
3496 
3447 


3428 
S404 
34R2 


\ 


DATA EXERCISER OJAL4G V0083 2edUGe72 7137 PAGE 1228 


4642 
4625 
1542 
2422 
7749 
6228 
4114 
4405 
A784 
1449 
2628 
2842 
A532 
2949 
25086 
1417 
4888 
2530 
2495 
1624 
a504 
4929 
2205 
A$i4 
2344 
1746 
4945 
1704 
7589 
4408 
2022 
523 
2949 
2223 
27796 
2327 
7649 
6549 
1196 
4989 
S447 
2549 
A447 
4016 
1724 
4019 
24126 
ASAD 


5492 
e282 
38418 
7604 


7X54, TEXT 7ILLEGAL FRPP EXP UFLO 7 


TX52s TEXT TEXTENDEO PRECISION MODE? 


TX53s TEXT POEPRESS RSW<SW> 3 YF 7 


TX3 4s TEXT TYQOU DO NOF HAVE? 


/ 
/6 MODE PROGRAM RUNNING CONCURRENTLY WITH FPP PROGRAM 
/ 


#3492 

PROGSM, 2 /CONTAINS RETURN TO 8&8 MODE PROGRAM INIFIALIZING FPP TESTS 
DGA 12 /ZINITIALLY CLEAR LOC 12 

WATT: LAS AREAD SWITCHES 











/FLOATING POINT OATA EXERCISER DJALL@ 


4277 
4278 
4279 
4289 
4284 
4282 
4283 
4284 
4285 
4286 
4287 
4288 


3483 
3444 
3445 
3486 
3407 
$412 
3444 
$442 
3443 
3444 
$445 
$446 
S447 
3429 
3424 
3422 
3423 
3494 
3425 
3426 
3427 
$3439 
3434 
$432 
3433 
3434 
3435 
3436 
3437 
3449 
3444 
3442 
$443 
3444 
3445 
$446 
3447 
3459 
3484 
3482 
3483 
3454 
3455 
3456 
3457 
3462 
3444 
3462 
3463 
3464 
3445 
3466 
3467 
3476 
S474 


Oo 


Se 


A435 
7689 
5212 
7349 
3464 
3040 
5213 
3464 
7604 
0434 
7458p 
5227 
7044 
1007 
7449 
$227 
734g 
3463 
3649 
3234 
7308 
3463 
1405 
7649 
5237 
7342 
3408 
5247 
1496 
7640 
5267 
7349 
3496 
1156 
S044 
5252 
7309 
1455 
SOd4 
1437 
3643 
1346 
7027 
3347 
1346 
1347 
7925 
33416 
1346 
3444 
2843 
5254 
1922 
7642 
8344 


NUKe 


RAN, 


RAs 


CONT. 


ANO 
SNA 
JP 
CLA 


CLA 
CLL 


ACA ! 


OCA 
JMP 
DCA 
LAS 
AND 
SNA 
JMP 
CMA 
TAD 
SZ 
JMP 
CLA 


Tac 


CLb 


OCA ! 


OCA 
JMP 
CLA 


CLL 


BCA 1 


TAD 
SZA 
UMP 
Cl 
OCA 
JMP 
TAQ 
SZA 
JMP 
CLA 
OCA 
TAD 
OCA 
MP 
CLA 
TAD 
OCA 
TAO 
DCA 
TAD 
CML 
nCA 
TAO 
TAD 
CoML 
DCA 
TAO 
pCa 
1Sz 
JMP 
TAD 
SZA 
JMP 


CLA 
CLL 


CLA 
CLL 


CLL 


TAC 


TAC 


CLA 


V8GS 


K4g 
(+3 
CMA 
LOKSE 
12 
12 
LOKSE 
K39 
NUK 
NUM 


NUK 


INPLAG 


TOONE 


2eAUGe?2 74387 PAGE 1929 


/MASK OFF BITS @e6 AND Seif 

/}F BIY 7 IS SET LOCK ONTO TEST SEGMENT 

/NO © DO NOT LOCK 4N TO TEST SEGMENT 

f/ACe27777 

/FLAG FPP TQ LOCK ONTO A PARTICULAR TEST SEGNENT 
/CLEAR LOC 1@ SO FPP PROG WILL NOF TIME OUT 


CLEAR FLAG 

/READ SWITCHES 

/MASK CFF BITS Ga6 

/SKJP IF AC 1S NON@ZERO 
/SW REG BITS Beit = @ BONT LOCK ONTO ANY Test 
/LOCK ONTO TEST SEP INYO SW REG BITS Beis 
/ARE WE PRESENTLY EXECUTING THIS TEST 

/SKIP {FF ACag 

/NOePONT LOCK ON 

AYESeLOCK ON 

/FLAG FRPP TO LOCK ONTO PARTICULAR TEST SEQUENCE 
/CLEAR LOG 4@ 70 PREVENT FPP TIME OUT 


/DO NOY LOCK ONTO PRESEN? PPP TEST SEQUENCE 
/CLEAR FLAG 
F Y8L4 PLAG fS RESEF 


PILL FABLES | 
/SKIP JF AC ZERO 


/AGCS7777eefABLEL FLAG 1S RESET 

/SET FEL FLAG YO PREVENT ALTERING OF FABLES 
/G®8 TO RANDOM NUMBER ROUTINE 

/FILL PABLES If TALS PLac 1S RESET 

/SKIP LF sed | . 
/BOTH RANDOM NUMBER TABLES HAVE BEEN FILLED 
fACa7777 

/SEY T8L3 FLAG TO PREVEN? ALTERING TABELS 
/LOAQ 6777eeSA FOR TABLES 


/L,0A0 S777eeSA OF PABLEL 

/INTO LOC 44 

/L OAD #488 

/INTO LOC 43 

/RANDOM NUMBER GENERATOR 

/COMPLEMENT LINC, ENG AC AND ROYATE AC 2 LEFT 
/AE TO RANB 

AACBRANA 

AADO RANB 

A/COMPLIMENT LINC, ING AC AND ROTATE AC 1 LEFT 
/AC TQ RANA 

/ACBRANA 

/DEPOSITY IN SPECIFIED PABLE 

ADGONE 488 FYMES 

ANGeDhO [F AGAIN 

/LOC INFLAG TELLS PROGSM IF FPP INTERRUPTED 


SYESeSTART NEXT FRPP TEST 


i, 


oy, = 


/FLOATING POINT DATA EXERCISER OJALia 


1532 
4538 
4534 
413535 
1336 
4537 
4338 
13539 
4540 
4344 
4342 
4548 
4344 
1345 
4346 


3472 
3473 
3474 
3475 
3476 
3477 
3542 
S5A4 
3582 
3583 
3504 
3505 
3526 
3587 
$512 
3544 
EET: 
3543 
3544 
3515 


S546 
3347 


3520 
$524 
3322 
3528 
S324 
3325 


3524 


3688 
SOA4 
3682 
36a3 
S6G4 
3685 
3OM6 


36087 
36418 
S641 
3642 
3645 
3644 
3615 
3646 


2019 
5202 
4473 
2554 
4493 
2577 
7402 
1142 
3242 
6554 
2040 
5304 
1922 
7642 
5282 
4473 
2626 
7402 
3922 
5622 


C222 
AGAR 


7988 
1162 
3497 
4726 
3725 
3689 


4074 


3600 
7342 
3022 
4462 
7604 
2354 
7649 
7402 


2487 
5246 
6082 
11449 
4503 
1460 
3497 
6004 


TDONE, 


/ 
RANA 
RANG; 


V@as 
1S2 14 
JMP WATT 
JMS ~— PRINTR 
7X25 
JMS ! PRINTR 
FX26 
al a 
FAD K7702 
OCA 10 
PPHLT 
1S2 12 
JMP ,e4 
TAd INFLAG 
SZA CLA 
JMP WAIT 
JMS ~ = PRINTR 
¥X27 
HLT 
DCA INPLAG 
JMP PROGEM 
a 
', 


/ 
/PBPeB PROGRAM SETPING 


/ 
START, 


/ 
STMESS, 
/ 


STAR: 


CLA CLL 
FAD K7 708 
DCA BELL 
JMS } STMESS 
JMP f ,of 
STAR 

SYMES 

#3608 

CLA CLL CMA 
PGA INPLAG 
JMS | PROGB 
Las 

AND K4908 
SZA CLA 

WET 


2eAUGe7e 7137 PAGE 19308 
/INC TIME OUT LOOP 

/.QOP THROUGH PROGAM AGAIN 
/PRIN® /MESSAGE 

/LOC 148 TIMED OUT 

/PRINYT /MESSAGE 

/KEY CONTINUE WILL ISSUE FPHLT 
/JWALT POR OPERATOR INTERVENTION 
/LQAD #122 

/PUT IN LOC 42 

/{OTeeCPY FORCED EXIT 
/INCREMENT LOC 412 

4490 OCTAL TIMES 

/WAS HE FPP INTERRUPTED 


/YESeCHECK SW SETTINGS 
/PRINT /MESSAGE 

7FPP HUNG | 
/ew=sJNRECOVERABLE HALVeoFPP HUNGes== 
/CLEAR INTERRUPT FLAG 

/START NEXT FPP TEST 


/RANOQOM NUMBER A 
/RANDQM NUMBER B 


UP ANO INITIATING FPP QPERAPIONS 


/ACa778Q 
/SET UP BELL CNTR 
/Q0 WE HAVE AN EPM FPPei2 


fAC87797 

/SET INFLAG TO ALLOw PROGS TO INIPIALLY START FPP 
/BMODE CONTROL 

/RFEAD SW REG 

/MASK 

/IF AC JS NONwZERQ HAL? A? END OF PASS 

AKEY CONTINUE FO KEEP GOING 


/ 
/SET UP AND START FPPL TEST 
/¥O BE EXECUTED IN FLOATING POINT MODE 


/ 
The 


1$z BELL 
JMP 1*6 
]OF 

TAD K207 
WMS f TYP 
TAD K7700 
OCA BELL 
ION 


/DONE 409 OCTAL PASSES 
/NO@CONTINUE 

/TURN JNTERRUPTS OFF 
/YES 

/RING TTY BELL 

/SET LOC 

/BELL #7700 

/TURN INTERRUPTS ON 




















/FLOATING POINT 


4387 
4388 
4589 
13590 
4591 
1392 
4595 
4594 
1395 
4596 
4397 
1398 
1399 
4499 
1403 
4422 
44235 
4404 
4435 
4406 
4407 
4408 
4409 
4412 
4444 
$412 
1445 
4444 


44 
ire 


3647 
3628 
3624 
3622 
3623 
3624 
$625 
3626 


3627 


3658 


S634 
3632 
3635 


3634 
3635 
3636 
3637 
3649 


3644 
3642 
3643 
$644 
3645 


3646 
3647 
3659 
3654 
3682 


3653 
3654 
3655 
3656 
3657 
36460 


Ne 


" 
1 ) 
‘ 
iy 


DATA EXERCISER DLALI2 


1112 
5887 
3225 
1454 
3226 
44163 
4462 
5445 


i344 
3087 
4168 
4462 
3426 


1442 
3907 
4463 
4462 
3405 


4313 
3287 


4463 


4462 
3496 


1414 
3097 
4463 
4462 
3405 


1145 
S67 
4444 
44.68 
4462 
3426 


FAQ 
nca 
MCA 
TAD 
ACA 
JMS 
JMS | 
DCA 


VOGS 


Ki 
NUM 
APT 
K4a20 
AP Tet 
FPPST 
PROGE 
FBLA 


2ehUGe7e 7437 


ALOAD TEST NUMBER 4 
“ZENTO LOC NUM 


/CLEAR FIELD BITS IN APT TABLE ON PAGE 8 


PAGE 1031 


/LQAD 4000eSTART OF FPP CONE 


ASTORE INTO FPC POENTER IN APY TABLE ON PAGE 2 


ASTARY FPP 
/BMODE CONTROL 
JCLEAR FABLES PLAG 


/ 
ASET YP AND START PPP2 TEST 
/TO BE EXECUTED IN DOUBLE PRECISION MODE 


/ 

72: FAD 
OCA 
JMS 
JMS ] 
DCA 


K2 
NUM 
FPPST 
PROGB 
TBL3 


/.0AD TEST NUMBER 2 
/INTO LOC NUM 
/STARY FPP 

/BMODE CONTROL 
/CLEAR TABLES FLAG 


/ 
/SET VP AND START FPPS TEST 
/¥O BE EXECUTED IN FLOATING POINT MODE 


/ 

T3, TAD 
DCA 
UMS 
JMS | 
DCA 


KS 
NUM 
FPPST 
PROGE 
FBLA 


/LOAD TEST NUMBER 3 
/YNTO LOC NUM 
/START FPP 

/8MODE CONTROL 
/OLEAR TABLES PLAG 


/ 
/SET WP ANO START PRP4 TEST 
/¥O0 BE EXECUTED IN DOUBLE PRECISION MOQDE 


/ 

74; TAQ 
OCA 
JMS 
JMS j 
OCA 


K4 
NUN 
FPPST 
PROGE 
TBLS 


/LOAD TEST NUMBER 4 
AUNTO LOG NUM 
/STARY FPP 

/BMOSE CONTROL 
ACLEAR TABLES FLAG 


/ 
/SET YP AND START FPPS TEST 
/¥O BE EXECUTED IN FLOATING POINT MODE 


/ 

75, TaD 
DOA 
JMS 
JMS t 
DCA 


K5 
NUM 
FPPST 
PROGE 
FBLL 


/, OAD FEST NUMBER S 
/INTO LOG NUM 
ASTART FPP 

/OMODE CONTROL 
/CLEAR TABLES FLAG 


y, 
/SET UP ANDO START FRP6 TES? 
/TO BE EXECUTED IN DOUBLE PRECISION MODE 


/ 

76, TAD 
DCA 
JMS } 
JMS 
JMS 
OCA 


K6 
NUM 
CLLS# 
FPPSY 
PROGS 
FBL3 


Ai OAD TEST NUMBER 6 
AYNTO LOC NUM 


/CLEAR LEAST SYGNIFICANT WORD OF OP ARGS 


/STARY FPP 
/OMODE CONTROL 
/CLEAR TABLES PFLAG 


_ 


\ } 
hen ne? 





enamine. MUMAAIAAL Mi memes act bd sada 





Aci apt nnnniicdenaneanh emenunnnnsinnanrnianmeyinttine 


nn ae ON a ON CS CT 


? 
Y x 
iy 


/FLOATING POINT 


4442 
4443 
4444 
4445 
1446 
4447 
1448 
4449 
4452 
4434 
4452 
£435 
4,454 
4455 
4456 
4457 
1456 
4459 
4460 
4463 
4462 
4465 


3644 
3662 
3665 
3664 
3665 


3666 
3667 
3678 
3674 
3672 
36738 


3674 
3675 
3676 
3677 
3722 


3784 
3782 
3743 
3704 
3725 


3786 
3787 
3742 
S744 
S712 


3745 
3744 
3745 
3746 
3747 
3720 


DATA EXERCISER DIALLe 


1116 
3007 
44163 
4462 
$495 


1447 
3207 
4444 
4163 
4462 
3496 


1420 
SQA? 
4463 
4462 
3405 


4424 
3007 
4163 
4462 
3196 


4422 
5O07 
4465 
4462 
3405 


1423 
3007 
4444 
4463 
4462 
3416 


V8aS 


2wAUGa72 7137 PAGE 1932 


/SEY UP ANDO START FPP? TEST 
/¥Q BE EXECUTED IN FLOATING POINT MODE 


/ 
77, 


TAD 
ACA 
JMS 
JMS | 
oCA 


K? 
NUM 
FPPST 
PROGS 
FBL1 


/,.QAD TEST NUMBER ? 
/INTO LOC NUM 
/STARY FPP 

/BMODE CONTROL 
/CLEAR TABLEL FLAG 


/ 
/SET UP AND START PPPI® TEST 
/¥O BE EXECUTED JN DOUBLE PRECISION MODE 


/ 
718, 


FAD 
OCA 
UMS | 
JMS 
JMS | 
DCA 


Kia 
NUM 
CLLSW 
FPPST 
PRAGE 
TELS 


/,QA0 TEST NUMBER {OB 

/INTO LOC NUM 

/JCLEAR LEAST SIGNIPICANT WORD OF DP ARGS 
ASTARY FPP 

/8MO0DE CONTROL 

ACLEAR TABLES FLAG 


/ 
/SET UP ANDO START FPPAd TEST 
/¥OQ BE EXECUTED IN FLOATING POINT MODE 


/ 
Fide 


Kid 


NUM 
FPPST 
PROGB 
TBLA 


/,QOAD FEST NUMBER 11 
/INTO LOC NUM 

/START FPP 

/B8MODE CONTROL 
CLEAR TABLEL FLAG 


/ 
/SET YP AND SYART PPPi2 TEST 
/YO BE EXECUTED IN DOUBLE PRECISION MODE 


/ 
7423 


/ 


TAD 
DCA 
JMS 
JMS | 
OCA 


Ki2 
NUM 
FPPST 
PROGS 
FBLS 


/,OAD TEST NUMBER f2 
ZINTO OC NUM 

/START FPP 

/OMODE CONTROL 
/CLEAR TABLES PFLAG 


/SET UP AND STAR? PPPAS TEST 
/¥O BE EXECUTED IN FLOATING POINT MODE 
/ 


74i3, 


TAD 
pCa 
JMS 
JMS | 
DCA 


Ki3 
NUM 
FPPST 
PROGE 
TBL4 


/OAD TEST NUMBER @3 
/INTO LOC NUM 

/STARY FPP 

/8MODE CONTROL 
/CLEAR TABLES FLAG 


/ 
/SET YP AND START FPPL4 TEST 
/TO BE EXECUTED IN DOUBLE PRECISION MODE 


/ 
T44, 


FAD 
oper 
JMS } 
JMS 
UMS J 
OCA 





Ki4 
NUM 
CLLSW 
FPPST 
PROAGS 
TBL3 


/LQAD TEST NUMBER 44 

7JNTO LOC NUM 

/CLEAR LSW OF RAN ARG IN TABLES 
/STARY FPP 

7BMODE CONTROL 

/CLEAR TABLES FLAG 





/FLOATING POINT 


1497 
4498 
1499 
1508 
1504 
4502 
4223 


S724 
3722 
3728 
3724 
3725 
3726 


3727 
3738 
3734, 
$732 
3733 


3734 
3735 
3736 
3737 
3749 
3744 
3742 
3743 


3744 
3745 
3746 
3747 
3758 


3754 
3752 
3783 
3754 
3755 


3736 
3757 


“) 


DATA EXERCISER OFALSG VOGS 2eAUGe7e 7137 PAGE 12033 


1124 
3Q07 
4445 
4163 
4462 
3405 


1425 
3007 
4463 
4462 
3406 


1426 


5209 


1427 
3007 
44438 
4462 
34086 


1432 
3987 
4468 
4462 
3405 


14324 
5887 


/ 

/SET YP AND START FPPIS TEST 

/¥O BE EXECUTED IN FLOATING POINT MODE 
/ 


715, FAD Ki8 /LQAD YEST NUMBER 45 
OCA NUM /INTO LOC NUM 
JMS { AL?EX /ALTER RAN NUM EXP IN FABLEL 
JMS FPPST  /STARYT FPP 
JMS I PROG& /@MODE CONTROL 
OCA TBLA /CLEAR FABLEL FLAG 


/ 
/SET UP AND START FPPPi6 TEST 
/¥O BE EXECUTED IN DOUBLE PRECISION PRINT MODE 


/ 
746, FAD Ki6 /LOAD FEST NUMBER 16 
OCA NUM INTO QC NUM 
JMS FPPST ASTARFT FPP 
JMS 1 PROGE /OMOQCE CONTROL 
BCA TBLS /CLEAR FABLES FLAG 


/ 
/SET YP ANO START FRPS? TEST 
4fQ BE EXECUTEBR IN FLOATING POINT MODE 


/ 

T1795 FAD Ki? /,0A0 TEST NUMBER {7 
OGA NUM /INTO LOG NUM 
JMS FPPSY /STARY FPP 
JMS } PROG8  /8MOBDE CONTROL 
BGA TBL4 /CLEAR TABLEL PFLAG 
TAQ EPMOPT /READ EPM PFLAG 
SZ4 CLA /SKI° IF EPmM OPTION 
JMP STAR ARE@START TESTS 


/ 
/SET VP ANO START FRP28 TEST 
/¥O BE EXECUTED IN EXTENDED PRECISION MODE 


/ 
720, AD K20 /,OAD TEST NUMBER 22 
DCA NUM “INTO LOC NUM 

JMS FPPS? /START FPP 
JMS 1 PROG@ /@MODE CONTROL 
pga TBL3 - /GLEAR TABLES PLAG 


/ 
/SET UP AND START FPP24 TEST 
/7O BE EXECUTEBR IN EXTENDED PRECISION MODE 


/ 
T2a, TAD K2q /i,0A0 TEST NUMBER 24 
OCA NUM /INTO LOG NUM 
AMS: FRPST SPAR? FPP 
JMS ] PRAGS /OMOBDE CONFROL 
DCA FBLA /CLEAR TABLEL FLAG 


/ 
/SET VP ANO START PPP22 TEST 
/7O BE EXECUTED IN EXTENDED PRECISION MODE 


/ 
F222, TAD K22 /L0A0 TES? NUMBER 22 
DCA NUM . “#YNTO LOC NUM 
o> 
SJ 


Te 





/FILOATINE 
4926 
1553 
4954 
4555 
1556 
4957 
4558 
4259 
1562 
4564 
4362 
1563 
4964 
4565 


POINT 


3766 
37614 
3762 


3768 
3764 
3765 
3766 
3767 


3778 
3774 
3772 
3778 
3774 
3775 


DATA EXERCISER OJALL® VO8S 2eAUGe72 7437 PaGE 1034 
4463 JMS FPPS? /SYARY FPP 
4462 JMS 3 PROGS /OMODE CONTROL 
34196 OCA TBL3 /CLEAR TABLES FLAG 
/ 
/SEY YP AND SYART FPP23 TEST 
/TO BE EXECUTED IN PRECISION MODE 
/ 
1432 723, TAD K23 /,,OA0 TEST NUMBER 23 
3Q07 DCA NUM /INTO LOC NUM 
4163 JMS FPPST  /START FPP 
4462 JMS f PRAGS /B8MODE CONTROL 
3495 OCA TBL4 /CLEAR TABLEL FLAG 
/ 
ASET WP AND START FPP24 TEST 
/7O BE EXECUTED JN EXTENDED PRECISION MODE 
/ 
41433 724, TAD K24 /\QA0 YEST NUMBER 24 
3997 DCA NUM /INTO LOC NUM 
4163 JMS FPPST /STARY FPP 
4462 JMS f PReGS8 /8MODE CONTROL 
3486 DCA TBL3 /CLEAR TABLES FLAG 
5200 JMP STAR /RE@START TESTS 
/ 
/ 
/ 
/ 
/ 
SECIALES 
/FLOATING POIN® CODE AREA 
PUALthd 


/ 

/THJS FIRST SECTION <FPPLePPPL9> OF THE PRO ARI THEMATIC 
/TEST OPERATES ON RANDOM NUMBER ARGUMENTS 

JIN TABLEL IF FLOATING PONT MODE 

JOR TABLES JF DOUBLE PRECISION MODE 

/YHE OPERATIONS ARE OF THE FORM Aedod 

/QR ABA/A WHERE THE RESULT EXPECTED {S$ 

/#WE RANDOM NUMBER ARGUMENT {TSELP 

/7WE RESULTS ARE SfORED IN 

/TABLE2 YF FLOATING POINT MODE 

/OR TABLE4 IF BOUBLE PRECISION MODE 

/FHESE TABLES ARE 408 OCTAL LOCATIONS 

ZIJN LENGTH AND ARE LOCATED IN NUMERICAL SEQUENCE 
/SPARTING AT LOCATION 6892 OF LOWER 4K 

ZANOD ENDING AT LOGATION 7777 OF LOWER 4K 


/ 
/TWE SECOND SECTION CFPP2QeFPP24> OF THE ARITHMETIC 
/TEST OPERATES JN THE SAME WAY AS THE PREVEOUS SECTION 
JEXCEPT THAT THE EXTENDED MODE OF OPERATION !S TESTED 
/TMIS EXTENDED PRECISION MODE OF OPERATION <EPM> 

/JUSES THE SAME TABLES AS THE PREVIOUS SECTION BUT ALL 
JIN THE SAME FLOATING POINT MODE 

/ 


JEXECUTE IN FLOATING POINT MODE 
/MOVE RANDOM ARG TABLEY 70 TABLE2 


























/FLOATING POINT 


4607 
1608 
4609 


4geg 
4ga4 
4gn2 
4g03 
4ga4 
4pa5 
4986 
4g07 
4918 
4944 
4912 
4g13 
4gi4 
4945 
4916 
49147 


age 
4g24 
4922 
4923 
4924 
4g25 
4926 
4027 
4gyg 
4934 
4Q8¢@ 
4933 
4934 
4g35 
4g36 
4037 


494 
4944 
4942 
4g4as 
4g44 
4g45 
4946 
4247 
49539 
4954 
4982 
4953 
4984 


x 


DATA EXERCISER OJALIG Veas 


4088 
1158 
4743 
2085 
2910 
5775 
6538 
6375 
1132 
3947 
2189 
4283 
2862 
1218 
1942 
4988 
2826 


1452 
$456 
2986 
8918 


PHA 


1432 
4743 
2005 
512 
3775 
1449 
5795 
2440 
5775 
6532 
6375 
1132 
5044 


/ 
#4302 

FPP4, JOR 
FSET 
STARTFE 
FLOAT5SEO 
TABLELad 
PFSTA!I532 
TABLE2e3 
JOR 
FOMPR 
JIXNI LOE 
PRP1i43 
FCLA 
FADD{2¢¢ 
JNE 


FPPY 
FEXIT 


2eAUGe?2 


SETUP FOR {ST 


/.,QA0 FROM TABLEL 
/STORE IN TABLE 2 


7437 PAGE i355 


/COMPARE YABLEY WI? KR TABLE? 


/COMPLETED BLOCK 
/YES 

/,,OCK ONTO FST 
/{F OFFSET 348 [S 


(NQSEXIT 


/ 
JEXECUTE IN BQUBLE PRECISION MODE 
/MQVE RANDOM ARG TABLES TO TABLES 


/ 

PPP2, Jgh 
OFSET? 
STARTO 
FLOA!S4¢O 
TABLESe2 
FSTAI530 
TABLE Gae 
JSR 
HRPEMPR 
JEN12 08 
PRP 263 


FCA 
PAQO} 292 
JNE 

PPP2 
FEXIT 


/SETUP FOR TST 


/\,04B RANQOM ARG 
/FROM FABLES 
/STORE SARE 

4{N FaBleé 
/JMPeSAVE RETURN 
470 COMPARE SUB 
/GOMPLETED BLOCK 


SYES 
A,0CK ONTO TST 
/{F OFFSET a2 IS 


ANOSEXIT 


/ 
ZEXECUTE JN FLOATING POINT MODE 


/aBO SUBTRACT VEST 


/ 

FPPS, JR 
FSET 
STARTEF 
FLOA{542 
TABLELes 
FADD {442 
TABLELeS 
FSUBI44¢2 
TABLE Las 
FSTA!532 
FABLEZeS 
Jar 
FOMPAS 


/JMPaSAVE RETURN 
“SETUP SUB 


/,,CA0 RANDOM ARG 
AFROM PABLEL 
AAA 

/AtAwA 

/SVORE IN TABLE? 


/JMPaSAVE RETURN 
/COMPARE SUB 


NON@eZBRO 


NONeZERO 


dey panne eeiettnetnss pate Pe Eth, NIM MelCUrelmbnesLauaNicmemesneAetertin en 


a 


/ELOATING POINT 


4662 
4663 
4664 
4665 
1666 
4667 
4668 
1669 
4672 
4673 
1672 
4673 
4674 
4675 
4676 
1977 
4676 
4679 
4080 
468) 
168¢@ 
4683 
4684 
4685 
4686 
1687 
4688 
1689 


4955 
4956 
4057 
49462 
4264 
4g42 
4943 


4ga4 
4965 
4966 
4967 
4970 
4974 
4972 
4g73 
4g74 
4975 
4976 
4977 
4120 
4404 
4482 
4143 
4104 
4485 
44126 
4407 


41128 
4441 
4ii¢ 
4445 
4444 
4415 
41446 
4447 
4422 
4424 
4422 
4423 
4424 
4425 
4426 
4429 
4439 
4434 
4432 
4433 


DATA EXERCISER 


2489 
4943 
2922 
1212 
1242 
4049 
2082 


1430 
5156 
A906 
2510 
6776 
4440 
6776 
2412 
6776 
653g 
7376 
4430 
5246 
2402 
4067 
290e@ 
1242 
4942 
4064 
CELT: 


1430 
4743 
8905 
2540 
5775 
3904 
6242 
4442 
5775 
6244 
$242 
6530 
6375 
L439 
5272 
210g 
4443 
A282 
1240 
1242 


DIALS 


JXNILO8 
FPPSe3 
FCLA 
FADDI242 
JNE 

FRPS 

FEX |? 


VO8S 


2eAUGe72 
ACOMPLETED BLOCK 


AYES 
/\1,0CK ONTO TST 


7437 


PAGE 1236 


/TF OFFSET 40 JS NONeZERO 


/NOPEXIT 


/ 
JEXECYTE IN DOUBLE PRECISION MODE 


/ADDeSUBTRACY FE 


/ 

FPP4, JSR 
OPSE? 
STARTO 
FL0A; 542 
FABLE See 
FADDI 4422 
TABLESe2 
FSUBI 492 
TABLESe2 
FSTAI532 
TABLE 4n2 
JSR 
OPCMPR 
JXN} {OS 
FPP4e3 


PCLA 
FADD 242 
JNE 


FPP 4 
FEXIT 


ST 


/JMPeSAVE RETURN 
/SETUP SUB 


/,0AD0 RANDOM ARG 
AFROM FABLES 
/AoA 


A/AgAa@A 


/STORE RESULT 
/}N FABLES 
/JMPeSAVE RETURN 
/COMPARE SUB 
/COMPLETED BLOCK 
/YES 
/,OCK ONTQ TEST 
/\PF OFFSET 49 {5S 


/NOEXIT 


/ 
/EXECUTE IN FLOATING POINY MONE 


/MULTIPLYSDIVICE TEST 


/ 

PPPS, JSR 
FSET 
STARTF 
FLOAI542 
TABLELesS 
FNORM 
FSTAj2¢e2 
FMUL1442 
TABLELsS 
FSTA{2494 
FOIVi2te 
FSTAI532 
TABLE2aS 
JSR 
FCMPMD 
JXN} 198 
FPPSe#3 
FCLA 
FADD! 242 
JNE 


/JMPeSAVE RETERN 
ASETUP SUB 


/,QA0 RANDOM ARG 
/FROM TABLE 
/NORMALIBE 
/STORE IN OFFSET 
/AoA 


A/STORE IN OFFSET 
JAGA/A 

/STORE RESULT 
/IN FABLE? 
/IMPeSAVE RETURN 
/COMPARE SUB 
“COMPLETED BLOCK 


AYES 
/QOCK ONTO TST 
/\F OFFSET 12 [8S 





NON@eZERO 


42 


L4 


NONwZERO 




















/FLOATING POINT 


4747 
4716 
4739 
1728 
4724 
4722 
4723 
1724 
4725 
4726 
4727 
4,728 
4729 
4738 
4753 
4732 
4755 
1734 
4739 
4736 
4737 
4736 
4739 
4748 
4743 
4742 


4434 
4435 


4436 
4437 
414¢ 
4444 
Aide 
4143 
4444 
4445 
4446 
4447 
4152 
44,54 
4452 
4453 
4154 
4485 
4456 
4437 
41692 
4464 
446¢ 


4463 
44644 
4465 
4466 
4467 
4479 
4474 
4472 
4473 
4474 
4479 
4476 
4477 
4209 
4204 
4282 
4243 
42a4 
4285 
4276 
4287 
4212 
4241 
42i2 


DATA EXERCISER DIJALIe 


4410 
2088 


4432 
5156 
2286 
25128 
6776 
4412 
6776 
6244 
$440 
4776 
653g 
7376 
113¢ 
5266 
2462 
4441 
agne2 
1249 
1848 
4436 
2988 


1438 
4713 
#085 
2440 
3776 
8906 
8822 
OAS 
8940 
3775 
aad 
8012 
AS24 
aGi2 
B224 
A812 
apaa 
OBie 
e204 
8412 
63532 
6375 
1452 
3047 


FPPS 
PEXI? 


VOeS 2eAUGe72 7137 PAGE 1037 


ANOSEXIT 


/ 
/EXECUTE JN DOUBLE PRECISION MODE 
/MULTIPLY@OIVIBE TEST 


/ 
FPP6, 


JOR 
ORSE? 
STARTO 
PL OAI542 
TABLE Sw#2 
FMUL1498 
TABLE Swe 
PSTAI2¢4 
FOLVI422 
FABLESaa 
FSTA(532 
TABLE 4e2 
JSR 
DPEMPR 
JIXNILOB 
FPP6e3 
FCLA 
FAQD{292 
JNE 

FPP6 
FEX(T 


/JMPeSAVE RETURN 
/SETUP ROUTINE 


/\,040 RANDOM ARG 
AFROM FABLES 
/AGA 


/SFORE IN OFFSET 44 
/ABA/A 


/STORE RESULT 
JIN TABLES 
/JMPeSAVE RETURN 
/COMPARE SUB 
/COMPLEYEO BLOEK 


/Yes 
/,OCK ONTO TSF 
/tPF OFPSET 42 1S NONeZERO 


/NOSEXTT 


/ 
/EXECUTED IN FLOATING POINT MODE 
/NORMALIBESALIGN TEST 


/ 
PPR7 4 


JSR 

FSET 
STARTF 
PLOAL4ia 
TABLELe2 
STARTO 
ATX12 
STARTF 
PLOAIS¢2 
TABLELaS 
FNORM 
ALN{2 
FNORM 
ALN{2 
FNORM 
ALN}? 
FNORM 
ALN{2 
FNORM 
ALNI2 
FSTAI53@ 
TABLE2eS 
JSR 
FOMPR 


/JMPeSAVE RETURN 
/SETUP SUB 


/,0A0 RANDOM ARG 
/FROM FABLEY 


ASTORE IN {R 2 


OAR RANDOM ARG 
/FROM FABLES 
/NORMALIZE 
ALIGN ON IR 2 
ETC 


/STORE RESULT 
/IN FABLE? 
/QMPeSAVE RETURN 
ACOMPARE SUB 

-_ 


/ 


‘ 


\ H 
AFLOATING POINT 
4772 4213 
4773 4244 
4774 4215 
1775 4246 
14776 4247 
4777 4220 
4778 4224 

4779 

14782 

4784 

4782 

4783 

4784 

4785 4222 
4786 4223 
4787 4224 
4788 4225 
4789 4226 
1798 4227 
4794 4230 
4792 42314 
4793 4282 
4794 4233 
4795 4a34 
4796 4235 
4797 4236 
4798 4337 
4799 4249 
4822 4241 
4623 4242 
488e 42463 
4623 4244 
4604 4245 
4945 4246 
4926 4247 
1807 4258 
4508 4253 
4629 

4618 

1844 

181¢@ 

1845 

1644 

4645 4252 
18416 4253 
4847 4284 
4648 4255 
1849 4256 
4828 4257 
1624 4262 
4822 4264 
1828 4262 
4824 4243 
4425 4264 
4826 4265 


DATA EXERCISER DJALL 


2420 
4466 
4002 
1212 
1342 
$163 
2OAR 


1432 
5467 
A906 
e742 
an44 
815 
OB44 
2845 
2044 
2945 
an44 
9945 
e944 
0845 
6734 
1432 
5275 
2400 
4225 
ange 
1242 
4248 
4222 
apa 


1432 
4744 
4905 
2743 
4734 
6234 
A643 
5634 
1634 
2234 
1242 
4267 


JXNIL08 
FPP7 #3 
FCLA 
FADD{24¢2 
JNE 

FPP7 
FEXIT 


V288 


eehlGe72 PAGE 1038 


/COMPLED BLOCK 


7437 


7/YES 
/LOCK ONTO TST 
/{F OFFSET 42 1S NONZERO 


/NOGEXIT 


/ 

JEXECUTE JN DOUBLE PRECISION MODE 
/TESTS SHIFTING OF THE FAC VIA ALN INST 
/{NDEX REG 4 CONTAINS NUM RIGHY SHIFTS 
/JNDEX REG 5 CONTAINS NUM LEFT SHIFTS 


/ 
FPPIO, 


JSR 
OPSET4 
STARTD 
FLOAI742 
ALNY4 
ALNYS 
ALNI4 
ALNIS 
ALN} 4 
ALNIS 
ALN}4 
ALNIS 
ALN} 4 
ALNYS 
FSTAI734 
JSR 


DRPCPRY 
JXN} 196 

PPPY 05 

POLA 

FAQD! 240 
NE 


FPPC 
FEX]T 


/JMPeSAVE RETURN 
“SETUP SUB 


/,,Q0A0 RAN ARG FROM TABLE 3 
/SHIFF VIA JR 4 

/SHIFY VIA IR 5 

/ErC 


/SFORE RESULT IN TABLE4 
/JMPeSAVE RETURN 
/COMPARE ROUTINE 
/COMPLETED BLOCK 


/YES 
/,OCK ONTO FST 
/\F OFFSET 42 15 NONeZERO 


/NOGEXIT 


/ 
ZEXECUTED IN FLOATING POINT MQDE 

ZADD TO MEMORY@SUBTRACT TEST 
/PRELIMINARY COMPARE OF FADDM AND FADD RESULTS MADE 


/YWEY SHOVLO BE EQUAL 


/ 
PPPit, 


JSR 
FSET4 
STARTF 
FLOAI743 
FADD!7S4 
PSTA1234 
FLOA!643 
FADDMI63 
FLDA!634 
FSUB}234 
JEG 

GO4t 


4 


/JMPeSAVE RETURN 
/SETUP SUB 


7,0AD RAN ARG FROM TABLEd 
AAwA 

/STORE [N OFFSET 34 

/,.8aD RAN ARG FROM TABLE4 
/heh FO MEMORY 

/\,Q0AD AwA 

/SUBTRACYT OFFSET 34 
ASHOULD EQUAL ZERO 

/YES 














/FLOATING POINT 


DATA EXERE{SER OLALLG VeaS 
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4827 4266 28882 FEX|T /FADOM AND FADO RESULTS AIFFER 
4628 4267 2643 GO44, FLDAL64S /.QA0 ARG IN FABLEZ 
4829 4270 6634 FSTAI634 /SPORE BACK IN TABLE2 
1950 4271 1132 JSR /JMPeSAVE RETURN 
£851 4272 5847 FOMPR /COMPARE 
1832 4273 240g JXNIG Ge /COMPLETEO BLOCK 
4833 4274 4255 FPPiie3 
1834 4275 8802 FCLA /YES 
4835 4276 1249 FADDI240 /LOCK ONTO TSY 
4836 4277 1949 JNE /IF OFFSET 4¢ 1S N@NeZERO 
4837 430g 4282 FPPLt 
4838 4301 egag FEX]? /NOWEX{T 
4839 / 
4846 /EXECYUTED IN DOUBLE PRECISION MODE 
$643 /ADD TO MEMORYRSUBTRACT TEST 
4842 /PRELIMINARY COMPARE OF FAQOM AND PaO RESULTS ARE MADE 
4843 /THEY SHOULO BE EQUAL 
4644 / 
4545 43@2 41132 FPR42, JSR /JMPeSAVE RETURN 
4646 4393 5242 DPSET2 /SETUP SUB 
4847 4394 AGG6 STARTD 
4946 4385 2742 FLOAI742 /.QA0 RAN ARG FROM TABLES 
4949 4386 i734 FADDIIS4 /AeA 
4852 4387 6234 PSTAL234 /STORE IN OFFSET 34 
4854 4342 4642 FLOAL6$2 /L OAD RAN ARG FROM TABLES 
4452 4344 56314 FADOM {654 /Aba FO MEMORY 
4833 4342 8634 FLOAL6éS4 f,,G@AG RESULT AeA 
4954 4343 2234 FSUBI25¢4 /SUBTRACT OFFSET 34 
4855 4344 1028 JEG /SMOULD EQUAL ZERO 
4836 4345 4347 6042 AYES | | 
4637 4346 2909 FEXIT /FADOM AND FADO RESULTS DIFFER 
4656 4347 28642 Go42, FLDAI6$2 /LOAD ARG IN FaBLleS 
4859 4328 6634 PSTAI6S4 ASTORE BACK IN TABLES 
48468 4324 1438 Jor AJMPeSAVE RETURN 
4664 4322 3266 OPCMPR /COMPARE SUB 
4862 4323 2496 JXN1 498 /COMPLETED BLOCK 
4863 4324 4395 PPP4{2¢5 
4644 4325 2982 FOLA /YES 
4868 4326 1249 PADO!24@ /LGCK ONTO ST 
4846 4327 4949 JNE AUF OFFSET 48 1S NONs#ERO 
4667 4339 4382 PPPd? 
4868 4334 8909 FEXI? /NO@EXIT 
4669 / 
4478 /EXECUTED IN FLOATING POINT MODE 
$873 /MULTIPLY FO MEMORY DIVIDE TEST 
4872 /PRELIMINARY COMPARE OF FMULM AND PMUL RESULTS ARE MADE 
4875 /FHEY SHOULO BE EQUAL 
874 / 
+375 4332 41138 PPPS, JSR /JMPeSAVE RETURN 
4876 4333 4744 PSETS SETUP SUB 
4u77 4334 2908 SFARTP 
4878 4335 28743 FLDA!743 /,OAD RAN ARG FROM TABLE? 
1879 4336 9906 FNORM /NORMALIZE 
488¢ 4337 6242 FSTA!2¢2 /STORE IN OFPSET 12 
4684 4349 4734 PMULI7S4 /ABA 
o <= 
7 Zz Mee, ae 


unas ~ baie emt tomcat barr llasetl amd, 


Su ceadiiae etc Ra tetas Ee 


a 


\ 


/FLOATING POINT DATA EXERCISER DIAL4a vaa3 


4882 
1883 
4984 
4685 
4886 
4887 
4888 
4689 
1890 
4694 
4892 
£899 
4894 
4095 
1696 
4897 
4898 
4899 
49a 
4923 
4902 
4945 
1924 
4905 
4926 
4927 
4926 
1929 
1742 
4743 
4918 
4943 
4744 
4945 
4946 
4947 
4916 
4949 
4920 
4923 
L¥22 
4928 
4924 
4925 
4726 
1927 
4¥28 
4929 
4932 
4934 
4932 
4933 
19354 
1935 
1936 


q 


4344 
4342 
4343 
4344 
4345 
4346 
4347 
4352 
4354 
4352 
4383 
4354 
4355 
4356 
4337 
4360 
4364 
4362 
4343 


4344 
4365 
4366 
4367 
4372 
4374 
4372 
4373 
4374 
4375 
4376 
4377 
4449 
4404 
4482 
44683 
4404 
4495 
4406 
4407 
4442 
4444 
4442 
4413 


4444 


6234 
Zeie2 
7634 
2634 
2234 
1988 
4354 
agag 
F648 
6634 
143¢ 
5047 
2420 
4335 
A982 
12128 
1249 
4332 
LD) 


1432 
5242 
2206 
0742 
4934 
6234 
7642 
7634 
1634 
2234 
1gag 
4404 
8988 
POde2 
6634 
1432 
5266 
241090 
4367 
agae2 
1242 
1842 
4364 
agag 


1452 


GOLS, 





FSTAI234 
FLDA!242 


FMULMI634 


FLDA!634 
FSUBI234 
JES 

GO4Ls 
PEXI? 
FLOA!643 
FSTAL634 
JSR 
FOMPR 
JXNILO8 
FPPi3eS 
FCLA 
FADD! 242 
ANE 
FPP1S 
FEX]T 


f 7 4 
% 


2ehAUGu72 7437 PAGE 1042 
STORE IN OFFSET 34 

ALQOA0 OFFSET 12 

/A®A FO MEMORY 

/,QAB RESULT ABA 

/SUBTRACT OFFSET 34 

/SHOULOD EQUAL #ERO 

/YES 

/FMULM AND FMUL RESULTS AIFFER 
/GET ARG IN TABLEY 

/SF¥ORE BACK JN TABLE? 
/JMPeSAVE RETURN 

/COMPARE 

/COMPLETEO BLOCK 


/YES 
/,O0CK ONTO YST 
/YF OFFSET 12 YS NONeZERO 


/NOSEXTT 


/ 
/EXECUTED IN DOUBLE PRECISION MODE 

/MULTIPLY TO MEMORYeDIVINE TEST 

/PRELIMINARY COMPARE OF FMULM AND PMUL RESULTS ARE MADE 


/THEY SHOULD BE EQUAL 
/ 


PPPL4, 


6044: 


JOR 
OPSET2 
STARTO 
FLDAI74&2 
PMULI7S4 
PFSTAI234 
PLVALé642 


FMULM {635% 


PLOAL634 
FSUB! 234 
JEQ 
GO44 
FEXI? 
FLOAI64¢2 
FSTAI6S4 
JSR 
DPCMPR 
JXNI 108 
FPP i468 
FCLA 
FADD! 292 
NE 


7 
FPP14 
FEXIT 


/JMPeSAVE RETURN 
/SETUP SUB 


/\|,OA0 RAN ARG FROM TABLES 
/A@A 

/STORE IN OFFSET $4 

/LOA0 RAN ARG FROM TABLES 
/AeA FO MEMORY 

/LOAD RESULT Aaa 
/SUBTRACT OFFSEY 34 
/SHQULO EQUAL #ZERQ 

/YES 

/FMULM ANO FMUL RESULT DIFFERS 
/LQAD ARG IN TABLES 

/PUT BACK IN TABLES 
/JMPeSAVE RETURN 

/COMPARE SVB 

/COMPLETED BLOCK 


/YES 
/,OCK ONTO TST 
/}F OFFSET 48 JS NONZERO 


ANO@EXIET 


/ 
JEXECUTED IN FLOATING POINT MODE 

/ADO SUBSTRACY TES# USEING RAN MANFISSAIS 
/COMPARE RESULTS # THEY SHOULO BE EQUAL 


/ 
FPPL5, 





JSR 


AJMP » SAVE RETURN 











sFLOATING POINT DATA EXERCISER O]ALdO 


4937 
4938 
1939 
4948 
4944 
1942 
1943 
4944 
1945 
4946 
4947 
4¥48 
4949 
1950 
4954 
4952 
4953 
4954 
4955 
1956 
1957 
4¥56 
4959 
4960 
1964 
1962 
1963 
1964 
4965 
1966 
4967 
4968 
4969 
4970 
4974 
1972 
1973 
1974 
1975 
1976 
1977 
4978 
1979 
4982 
1984 
4982 
1983 
1984 
4985 
1986 
4987 
4,988 
4989 
1990 
4994 


4445 
4445 
4447 
4429 
4424 
4422 
4423 
4424 
4425 
4426 
4427 
4430 
4434 
4432 
4433 
4436 
4435 
4436 
4437 
4449 
4444 
4442 
4443 
4444 
4445 


4446 
4447 
4459 
4454 
4452 
4453 
4454 
4455 
4456 
4487 
4442 
4464 
4462 
4463 
4464 
4465 
4466 
4467 
A47B 
4474 
4472 
4473 
4474 
4695 


© 


4773 
ggas 
O86 
O34 
“222 
2112 
Aas 
e905 
2548 
8775 
4529 
5995 
2499 
6775 
653¢ 
6395 
1139 
59532 
210g 
4447 
a9e2 
1212 
1242 
4444 
S889 


1432 
3243 
2206 
0234 
B822 
Gii2 
O084 
540 
6776 
1529 
6776 
2429 
6776 
6539 
7376 
4438 
5266 
2100 
4484 
an? 
1218 
1042 
4446 
A968 


FSET2 
STARTF 
STARTD 
XTAS 
AYX{2 
ADDX!2 


i 

SYTARTF 
FLOAI5S&S 
FABLELes 
FADD !520 
FABLELeS 
FSUB!422 
TABLEGaS 
PSTAISSB 
FABLE2eS 
JSR 
FCPASY 
JXNI 188 
FPPL5e3 
FCLA 
FADD} 242 
JNE 
FPPiS 
FEX]? 


VGaS 
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SETUP ROUTINE 

/SET FLOATING POINT MODE 
/SET DOUBLE PRECISION MONE 
/L OAD RY 

/STORE IN [R2 

f480 

/4 TO YR2 

/SET FLOATING POIN? MODE 
/L.QA0 RAN NUM ARG 

/PROM TABLEL 

/ABD RAN NUM ARG 2 

/FROM PABLEL 

/SUBTRACT RAN NUM ARG 2 
/IN TABLES 

/STROE RESULT IN 

/FABLE2 

/JMP © SAVE RETURN 
/COMPARE SUB 

/COMPLETEO BLOCK 


“YES 
A, OCK ONTO TEST 
{FP OFFSE? 49 [S NONeZERO 


JNO @ EXIT 


/ 
JEXECUTED JN DOUBLE PRECISION MODE 
/A00 w SUBTRAC? TEST USING RAN NUMS 


/ 
PPPLS, 


JOR 
DPSETS 
STARTD 
XTAI4 
ArX12 
ADDX{2 


4 
PLOALS$S 
FABLE Sad 
FAQDO{522 
TABLE Sed 
FSUBI428 
TABLESe2 
FSTA!53¢ 
FABLE 4e2 
JoR 
OSPCMPR 
JXNELOB 
FPP{6eS 
POLA 
FAQD!242 
JNE 
FPPI6 
FEXIT 


/j4P e@ SAVE RETURN 
ASETUP ROUTINE 
/STARF OF MODE 

AL GAD IRS 

/STORE IN [Re 

/A60 

44 TO IR2 

/.L OAD RAN NUM ARG 
/FROM TABLE 3 

/AQD RAN NUM ARG 2 
/FROM FABLE 3 
/SUBFORMAT RAN NUM ARG 2 
/{N FABLE 3 

ASTORE RESULT IN 
/TFABLE 4 

/jJMP = SAVE RETURN 
/COMPARE SUBROUTING 
ACOMPLETED BLOCK 


/YES 
/LOCK ONTO TEST | 
/IF OFFSET 42 1S NONSERO 


/NG e@ EX[T 


/ 
/EXECUTED IN FLOATING POINY MODE 


whenever el 


a 


om 


/FLQATIN 


1992 
4993 
1994 
4.995 
4996 
4997 
1998 
4999 
2000 
2004 
2002 
2003 
2po4 
2005 
2006 
2007 
2008 
2009 
2040 
2044 
2042 
2043 
2014 
2045 
2046 
2047 
2048 
2049 
2020 
2024 
2022 
2023 
on24 
2025 
2026 
2027 
2028 
2929 
2030 
2034 
2032 
2033 
2034 
2935 
2036 
2037 
2238 


6 POINT 


4476 
4477 
4509 
4504 
4502 
4503 
4504 
4505 
4506 
4507 
4540 
4544 
4542 
4543 
4544 
4545 
4516 
4547 
4520 
4524 
4522 
4523 
4524 
4525 


4526 
4527 
4539 
4534 
4532 
4533 
4534 
4535 
4536 
4537 
A542 
4544 
4542 
4543 
4544 
4545 


4546 
4547 


DATA EXERCISER 


1430 
4743 
A805 
e540 
5775 
rOn4 
2003 
8003 
AO03 
2842 
A003 
2003 
agas 
6539 
6375 
4432 
5443 
2100 
4504 
ULF 
1242 
1040 
4476 
BRA0 


4452 
3982 
8852 
0910 
6772 
6530 
737@ 
4450 
926 
2440 
49514 
LS: 
1248 
1242 
4526 
AOAB 


1452 
292 


OJALIG 


— 
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/NEGATION TEST ON RAN NUMS 
/CHECK RESULTS 


/ 
FPP47, 


JSR 
FSET 
STARTF 
FLOA!I5¢2 
TABLELes 
FNORM 
FNEG 
FNEG 
FNEG 
FNOP 
FNEG 
FNEG 
FNEG 
FSTAI5S30 
TABLE2QaS 
ySR 
PCPA? 
JXN1188 
FPPI7eS 
FCLA 
PADD!242 
JNE 
PPS? 
FEXIT 


/JMP eo SAVE RETURN 

/SETUP ROUTINE 

ASTART FLOATING POINT MORE 
/LOAD RAN NUM ARG 

/FROM FABLE 4 

/NEGATE 

SEFC 


/STORE RESULY [IN 
A/FABLE @ 

AJMP @ SAVE RETURN 
ACOMPARE ROUTINE 
/COMPLETEO BLOCK 


YES 
/,OCK ONTO TEST 
/{P OFFSET 42 1S NON@ZERO 


NO @ EXIT 


/ 

JEXECUTED §N EXTENDED PRECISION MQDE 
/MOVE RAN NUM ARG PROM TABLE 3 TO TABLE 4 
/CHECK RESULT 


/ 
FPP2Q, 


JSR 
EPSET 
STARTE 
PLOA!IS4&2 
TABLE Ged 
FSTAIS3o 
TABLE 4a6 
Jor 
EPCPR 
JXNILOP 
FPP 28a 


FOLA 
FAOD{ 242 
JNE 


FPP28 
FEXIT 


/JMP o SAVE RETURN 

SETUP ROUTINE 

/SET EXTENDED PREGYISION MOBE 
/LQAD RAN NUM ARG 

/FROM FABLE 3 

/SFORE ARG 

/tN TABLE 4 

/JMP «@ SAVE REFURN 

ACOMPARE ROUTINE 

/COMPLETEOD BLOCK 


/YES 
/,,OCK ONTO TEST 
/\F OFFSET 10 [S NONwZERO 


/NOQ © EX]? 


/ 
JEXECUTED IN EXTENDED PRECISION MODE 
/JNEGATION TEST ON RAN NUMS 

/CHECK RESULTS 


/ 
FPP2i, 


JSR 
EPSET 


/JMP 2 SAVE RETURN 
/SETUP ROUTINE 














ope? 
2848 
2069 
2058 
2054 
2052 
2953 
2054 
2055 
2056 
2057 
2058 
2959 
2960 
2064 
2062 
2063 
2066 
2765 
2066 
2067 
2068 
2069 
2e78 
2074 
2072 
2873 
2074 
2679 
2076 
2077 
278 
2079 
2988 
2884 
2282 
ages 
2ga4 
2085 


2089 
2098 
294 
2092 
2093 
2294 
2995 
2096 
2297 
2098 
2099 
24ee 
2404 


4539 
4554 
4552 
4583 
4554 
4555 
4556 
4557 
4569 
4564 
4562 
4563 
4564 
4565 
4566 
4567 
4579 
4574 
4572 
4573 
4574 
4575 
4876 
4577 
4609 


4684 
4682 
4683 
4604 
4605 
4606 
4687 
4612 
4644 
4642 
4648 
46414 
4645 
4646 
4617 
4628 
4624 
4622 
4623 
4624 
4625 
4626 
4627 
4638 
4634 


Sd 
Me 


295g 
®542 
5772 
AaAAG 
2883 
2603 
PA4g 
POAS 
7083 
2883 
o842 
O283 
22083 
2983 
6539 
6372 
11439 
5335 
219¢ 
4551 
8902 
1240 
18428 
4546 
g9a9 


1458 
S3n2 
egSg 
9448 
6776 
AGG6 
A822 
2032 
2548 
6772 
agag 
842 
ega4 
4842 
842 
oga4 
M812 
2904 
Oga4 
2042 
A904 
A842 
4539 
7392 
1132 


/FLQATING POINT DAFA EXERCISER DPJALI® VOaS 


STARTE 
FLOA!SiO 
TABLELe#6 
FNORM 
FNEG 
FNEG 
FNOP 
PNEG 
FNEG 
FNEG 
FNOP 
FNEG 
FNEG 
FNEG 
FSTAI5I0 
FABLE2e6 
JOR 
ECPRY 
JXNILO8 
FPPZie5 
FCLA 
FAODD{2¢2 
JNE 
FPP2¢ 
FEX{T 
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ASET EXTENBED PRECTSION MODE 
/1,64D RAN NUM ARG 

/FROM FABLE 4 

ANORMALIZE 

/NEGATE 

SEC 


STORE RESULT 

/{N TABLE 2 

/JMP @ SAVE RETURN 
ACOMPARE ROUTINE 
/COMPLETED BLOCK 


AYES 
/LOCK ONTO TEST 
/\F OFFSET 42 TS NONe@ERO 


ANG e@ EX{T 


/ 

/EXECUTED IN EXTENDED PRECISION MODE 
/ZALJGN # NORMALIZE TEST ON RAN NUMS 
ACWECK RESULTS 


/ 
PPP22, 


JSR 
EPSET 
STFARTE 
FLQAS 492 
YABLESe2 
STARTD 
ATX) 2 
STARTE 
PLBAI54@ 
FABLES e6 
FNORM 
ALN|2 
FNORM 
ALNI2 
ALN 2 
FNORM 
ALN] 2 
FNORM 
FNORM 
ALN{?2 
FNORM 
ALNI2 
FSTAI53S2 
TABLE 4e6 
JSR 


/JMP e@ SAVE RETURN 

/SETUP ROUTINE 

/STARY EXTENDED PRECISION MOGE 
/L8a0 RAN NUM ARG 

FROM FABLE 3 

ASET DOUBLE PRECISION MORE 
/ASTORE YO {R2 

ASE? EXTENDES PREGYTSION MOGE 
/L,QA0 RAN NUM ARG 

/FROM FABLE 3 

/NORMALIZE 

ALIGN TO {R2 

/NORMALIZE 

/ALIGN TO fR2 

/ETC 


ASFORE RESULT 


AYN TABLE 4 

/AJMP e SAVE REPURN 
-_ 
7 


sant oe cab 


a o pooh ap ae! 


( 4 
\, 


/FLOATING POINT DATA EXERCISER DJALLO Voa3 


2402 
2403 
2404 
2405 
2406 
2407 
2428 
2409 
2448 
eaii 
2442 
2443 
2414 
2449 
2416 
2447 
2448 
2449 
2420 
2424 
2422 
2123 
2424 
2125 
2426 
2427 
21426 
2429 
2430 
2451 
2432 
2455 
2454 
2435 
2436 
2437 
2438 
2439 
2448 
2144 
2442 
2443 
2444 
2145 
2446 
2447 
2448 
2449 
2452 
2454 
2452 
2153 
2454 
2455 
2456 


4632 
4633 
4634 
4635 
4636 
4637 
4640 
4644 


4642 
4643 
4644 
4645 
4646 
4647 
465 
4634 
4652 
4653 
4654 
4655 
4656 
4657 
4668 
4664 
4662 
4663 
4664 
4665 


4666 
4667 
4672 
4674, 
4672 
4673 
4674 
4675 
4676 
4677 
4742 
4784, 
4782 
4783 
47844 
4785 
4706 


3326 
2400 
4604 
2902 
1212 
1940 
4624 
CELT 


4432 
5302 
A259 
942 
3772 
4442 
5772 
2412 
8792 
6539 
6372 
1452 
5344 
2462 
4645 
0982 
1212 
4242 
$642 
2008 


4432 
B3a2 
ARSED 
2540 
6772 
AgA4 
6él1e 
4242 
6214 
Sate 
6530 
7372 
1450 
5377 
2490 
4674 
ABK2 


EPCPR 
JXN} 128 
FPP22e3 
FOCLA 
FADD!242 
JNE 
FPP22 
FEX |? 


Aim, 
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/COMPARE ROUTINE 
/COMPLETEQ BLOCK 


/YES 
AL QCK ONTO TEST 
/YF OFFSET 1% 1S NONsZERO 


NO e@ EX{T 


/ 

JEXECUTED [N EXTEDNED PRECISION MODE 
/ADD e SUBTRAC? TEST ON RAN NUMS 
/CHECK RESULTS 


/ 
FPP2S, 


JSR 
EPSET 
STARTE 
FLOAI542 
TABLES a6 
PADD!449 
TABLE4a6 
FSUBI442 
YASLELe6 
FSTAI5S2 
FABLE2e6 
JSR 
ECPRAS 


/JMP e@ SAVE REFURN 

SETUP ROUTINE . 
/SET EXTENDED PRECYS{ON MODE 
/L,QA0 RAN NUM ARG 

/FROM FABLEY 

/a00 RAN NUM ARG 

/FABLES 

A/SUBTRAGCT RAN NUM ARG 
/FABLES 

ASFORE RESULT 

/3N FABLE? 

/JMP «@ SAVE RETURN 

/COMPARE ROUTINE 


JXN}108 /COMPLETED BLOCK 


PPP23e3 
FCLA 
FADDI 242 
NE 


FPP23 
PEXIT 


YES 
/LOCK ONTO TEST 
/UF OFFSET 48 $3 NONezERO 


NO @ EXIT 


/ 

/EXECUTED JN EXTENDED PRECISION MODE 
/MULTIPLY » DIVIDE TES? ON RAN NUMS 
/CWECK RESULTS 


/ 
FPP24, 


WSR 
EPSET 
STARTE 
FLOAS5¢2 
FABLES@#6 
FNORM 
FSTA!24¢2 
FMULi2%2 
FSTA!24¢4 
FOIVi2de 
FSTAI53¢ 
TABLE 4e6 
JSR 
ECPRMD 
JXNIGG8 
FPP2da3 
FCLA 


/JMP @ SAVE RETURN 

/SETUP ROUTINE | 
/SEY EXTENDED PRECISION MOBE 
/LOQAD RAN NUM ARG 

/FROM TABLES 

/NORMAL I 2E 

/STORE IN OFFSET 42 
/MULTIPLY BY OFFSE? 12 
/SPORE IN OFFSET 44 

/DIVIDE WITH OFFSET 42 
/STORE RESULT 

7IN TABLE4 

/JMP » SAVE RETURN 

/COMPARE ROUTINE 

/COMPLETED BLOCK 


/YES 




















2457 
2458 
2459 
2360 
2164 
2462 
2463 
24,44 
2465 
2166 
2467 
2468 
2469 
2470 
2473 
2472 
2473 
9474 
2475 
2476 
2477 
2478 
21479 
2480 
2484 
2432 
2443 
23,54 
2445 
2386 
2447 
2446 
24,89 
2490 
2494 
24%@ 
2493 
24,94 
2495 
2496 
2497 
2498 
2499 
2200 
2284 
2202 
2203 
2204 
2205 
2206 
2a07 
2208 
2209 
2210 
2214 


— /FLOATING POINT 


4787 
4718 
4741, 
4742 


47143 
4714 
4745 
4746 
4747 
4728 
4724 
4722 
4728 
4724 
4725 
4726 
4727 
4732 
4734 
4732 
4738 
4734 
4735 
4736 
4737 
4749 


4744 
4742 
4743 
4744 
4745 
4746 
4747 
4738 
4754 
4752 
4753 
4754 
4755 
4756 
4757 
4769 
4764 
4762 


\ j. 


DATA EXERCISER OJALig vaa3 


1212 
1842 
4666 
088 


2085 
C882 


8885 
oga2 
O488 
7653 
O4YA4 
agag 
8482 
74583 
ALA 
pgog 
7404 
AOR 
A405 
agag 
A406 
Agog 
2407 
agag 


2eAlGe72 7437 PAGE 19245 
FADD{24¢ /L0CK ONTO TEST 
JNE AIF OFFSET 412 JS NONeZERO 
PPP24 
FEXIT /NO e@& EX]? 
/ 
) 


TENTERED ONLY IN FLOATING POIN? MODE 
foi UP OF FPP INDEX REGISTERS 


PSET) STARTF 
FCLA ACLEAR THE FAC 
LOX @ 71,040 IR @ 
7653 AWITH #123 
LOXES AL Oa IR § 
Ys AWITM @ 
LOXx1e2 /,,GA0 TR 2 
g AWiTR & 
LOX{S 7,OAD0 IR § 
g AWITH @ 
LOX}S JET 
g 
LOX14 
g 
LOxI5 
Y, 
LOx16 
a 
Bent? 
JA ASMP ALWAYS 
BASEo4 /OFFSE? @ JN BASE REG FABLE 


/ 

VENTERED ONLY EN FLOATING POINT MODE 
/SETS UP FPP INDEX REGISTERS 

ZOUPL EATER TABLE INTO FABLE? 


PSeTa, STARTF ASET FLOATING POIN? MODE 
FOWA /CLEAR THE Fac 
LOX!¢ AL GAD [R @ 
7633 /WITH #125 
LOXSS /,0A0 TR 42 
a WITH 8 
LOxs2 /L0A0 IR 2 
7683 AWITH 2125 
LOX}S /LGA0 IR 8S 
4 4WiTs @ 

LDX}4 /LOAD YR 4 
2 AWITH @ 
LOX}S Ai,0A0 YR 5 
g AWUTTHM & 
LQ4%16 AERC 

g 

LOX {7 

4) 


* 


oh ill duacmelaematteninnentnteneetatn rete te 


a 


ss A 
/AFLOATING POINT 


DATA EXERCISER OF ALIA 


am 
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2212 4763 9542 MORE,  FLODAIS4@ /,OAD RAN ARG 

2213 4764 5775 TABLELas AN TABLES 

2244 4765 6559 FSTA!552 /STORE RAN ARG 

2215 4766 6375 TABLE2aS JIN TABLE2 

2216 4767 2420 JXN} 428 /DONE £25 TIMES 

2217 4770 4763 MORE /NOwDO [TF AGAIN 

2248 4774 12328 JA /gMP ALWAYS 

2249 4772 5604 BASEe4 /OFFSEY @ IN BASE REG TABLE 
2228 / 

2224 JENTERED ONLY YN FLOATING POINT MODE 

2222 /SETS UP FPP JNDEX REGISTERS 

2223 / 

2224 4773 9005 FSETZ2, SYARTF /SET PLOATING POINT MOBE 
2225 4774 phe FCLA /CLEAR THE Fac 

2226 4775 8499 LOX!e /,0a0 IR B 

2227 4776 7684 7654 /WITH #424 

2226 4777 0404 LOXI4 A,0ao IR 4 

2229 5292 A009 a AWITH @ 

2232 5904 2192 LOX}2 EPC 

2234 S902 904 4 

2232 59A3 A483 LOXES 

2233 5994 A902 ‘ 

2234 5985 8404 LOX}4 

2235 5296 A000 a 

2236 5907 4105 LOX} 3 

2237 519 agng a 

2458 S911 7106 LOXI6 

2239 5912 sg0g ‘4 

2240 3g43 9407 LOX}? 

2244 Sai4 e982 a 

2242 5915 1030 JA /JMP ALWAYS 

2243 5246 3604 BASEa4 /OPFSET & IN BASE REG TABLE 
2244 / 

2245 / 

2246 JENTER ONLY IN FLOATING POINT MODE 

2247 /COMPARE TABLEY WITH TABLE2 

2248 /THEY SHOULO BE EQUAL 

2249 /TEST OFFSET 46 IN BASE REG TABLE 

2252 /\{F NOT ZERO 

2254 /DECREMENY JNDEX REGISTERS AND 

2252 /EXECUTE SAME ARGUMENT IN FABLEL AGAIN 

2253 /THE RET PORTION OF THIS ROUTINE 

2254 /~S USED BY ALL OTHER COMPARE ROUTINES 

2255 JIN BOTH FLOATING POINT AND DOUBLE PRECISION MODE 
2256 / 

2237 5247 8442 FCMPR, FLDA!442 /,,OAD RAN ARG 

2258 5920 5775 TABLESeaS /IN TABLES 

2259 5g?4 2439 FSUB!430 /SUBTRACY RESULT 

2262 5g22 6375 TABLE2a3 /\N TABLE? 

2264 5g23 1942 JEQ AJMP YF FACHS 

2262 5g24 5226 RET /RET ROUTINE TO REENTER MAIN FPP PROG 
2263 5925 agag FEXIT /DATA ERROR EXIT 

2264 5Z26 8224 RET, FLDA!224 /LOAD OFFSET 46 IN BASE REG TABLE 
2265 5927 1002 JEG SUMP IF FACuGealF, DON? LOGK ONTO TEST SEQ 
2266 5930 5237 RETINC /RETURN FO MAIN FPP PROG 

















FLOATING POINT DAFA EXERCISER OFALLG VGGS 2ebAUGe72 7437 PAGE 12947 

2267 Sa34 2140 ADDX$2 /ADO TO IR g 
2268 S332 7777 79777 Jey 
2269 S333 141 ADDX] 4 /JaBO FO JR 4 
2272 5334 7777 7777 /e4 
2e74 8235 4443 ADOX!3 /ado fa [IR 3 
2272 5336 7797 97797 fat 
2273 5a37 4{938¢ RETING, JA /JMP ALWAYS 
2274 534g S64 BASEe4 /OFFSE? OF @ IN BASE REG 
2275 / 
2276 ZENTER ONLY IN FLOATING POINT MODE 
2277 /FROM AN ADDITION@SUBTRACTION TEST 
2278 /COMPARE TABLEG WITH TABLE2 
2279 /TMEY SHOULO BE EQUAL 
2288 / 
2284 Sa44 2442 FOMPAS, FLOAI442 /,QA0 RAN ARG 
2282 8342 5775 TABLEGsS /IN TABLES 
2283 S743 2439 FSUB1 430 /SUBTRACT RESULT 
2284 5944 6375 TABLE2eS /IN FABLE? 
2285 5945 1049 JNE /JMP EP FAG NOF @ 
2286 5746 5954 FASCK /ADDeSUBTRACT BATA ERROR 
2287 S247 183g JA AMP ALWAYS 
2288 5339 3926 RET /RET ROUTINE TO REENTER MAIN FPP PROG 
2259 / 
poe /FLOATING POIN? ADDeSUB FAILED 

294 / 
Bees 593514 6989 PASCK, FEXIT DATA ERROR EX{TT 
22 / 
2e94 ENTER ONLY IN FLOATING POINT MODE 
2295 /FROM FPPGS TEST 
2296 /FPP1i5 [8 A ADBeSUB TEST 
2297 /USING RANQOM MANTYSSAS 
2298 /COMPARE ARG [N TABLEY WITH RESULT IN TABLES 
he /TWEY SHOULD BE EQUAL 

1 / 
2304 Sg32 244¢ FCPASS, PLOA!449 /,0A0 RAN ARG 
2302 59583 S775 TABLELeS /IN TABLES 
2303 5984 2439 FSUB!I43o /SUBYRACT RESULT 
2304 5955 6375 TABLE 2ed AN FABLE? 
2305 5g36 104g JNE /JMP LF FAG NOP @ 
2306 5257 3962 CPASY /¥#0 GPASY ROUTINE 
25087 5968 1838 od A /JMP ALWAYS 
2306 5964 5926 RET AREY ROUTINE TO REBNYER MAIN FPP PROG 
2309 5362 A086 CPASL, STARTO /SEY DOUBLE PRECISION MONE 
2312 5963 1249 FADD! 248 /ADD OFFSET 42 OF RASE REG’ 
2944 §5g44 2@g25 STARTF /ASET FLOATING POINY MODE 
2542 5965 1942 JNE /JMP IF FAC NOF 8 
2545 3366 SOF4 FASCK 476 FASGKY, ROUFINE 
2314 5267 1839 JA /JMP ALWAYS 
23545 5378 3Q26 RET /RET ROUTINE TO REENTER MAIN FPP PROG 
2346 / 
23147 /POSSJBLE ERROR © GO fO PDPeS MODE TEST 
2348 
25419 59714 82g FASCKL, FEXI? 
23920 / 
2324 / 

a™~ fi ‘aa 
Ne fe es il! WY 





ee 
/FLOATING 


23922 
2323 
2524 
2325 
2526 
23527 
2328 
23529 
2330 
2534 
2332 
2333 
2334 
2335 
2336 
2337 
2538 
23539 
2342 
2344 
2542 
2343 
2344 
2345 
2346 
23547 
2348 
2349 
2330 
2954 
2352 
2353 
2554 
2555 
2356 
2357 
2356 
2359 
2368 
2564 
2362 
2363 
2364 
2365 
2366 
2367 
2368 
23569 
2972 
23574 
2572 
2373 
23574 
2575 
2376 


POINT DATA EXERCISER OFALIB8 V8GS 


5972 
5373 
5074 
5075 
5276 
5977 
5400 
5404 


34282 
5483 
5404 
5405 
54106 
5407 
3412 
S444 
3442 
S115 
5444 
5445 
5146 
3147 
5420 
3424 
5422 
5423 
5424 
54258 
5126 
54127 
5130 
5434 
5132 


5433 
5134 
8435 
5436 
5437 


2442 
5775 
2439 
6375 
1249 
5482 
1932 
3026 


2432 
6375 
104g 
5133 
AQA6 
1228 
7ga5 
6222 
0222 
2442 
3775 
4949 
5926 
3432 
6375 
2006 
1226 
G905 
6232 
4232 
2442 
5775 
1982 
5026 
ADAG 


0440 
5775 
4246 
1000 
5026 


om 
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JENTERED ONLY IN FLOATING POINT MODE 
JFROM ROUTINE DOING A MULTIPLYeDIVIDE TEST 
/TWIS ROUTINE COMPARES TABLEL WITH TABLE? 


/YHEY SHOULO BE EQUAL 


/ 
FOMPMD, FLOA!44$2 


YABLEiaS 
FSUB!I432 
YABLEQa5S 


/LQAD RAN ARG 

/IN FABLES 

/SUBTRACT RESULT 

/{N TABLE? 

/JMP YF FAC NOY * FO FMDCK 

/CGHECK FOR LEGAL UNDERFLOW OR ROUNDING ERR 
/JMP ALWAYS 

/RET ROUTINE YO REENTER MAIN FPP PROG 


/ 
/ENTERED ONLY YN FLOATING POINT MODE 


/FRQM FCMPMD ROUTINE 


/WHEN RANDOM ARG OLFFERS FROM RESULT 
/BY PLUS OR MINUS { DUE TO ROUNDING 
/ROUTINE TESTS FOR THIS OCCURANCE 

/ 


FMOCK, 


FLDA! 432 
TABLECeS 
JEQ 

FZM0 
STARTO 
FADD! 229 
STARTF 
FSTA!222 
FLOAL22@2 
FSUBI442 
TABLESeS 
JEG 

RET 
FLOA{432 
TABLE2eS 
STARTO 
FADD! 226 
STARTF 
FSTA!232 
FLOA{232 
FSUB{442 
TABLE1e#S 
JEG 

RET 
FEX[T 


/LOAD RESULT 

/FROM TABLEQ 

/JMP YF PACad FO 

/ROUTINE YO TEST FOR LEGAL UNDERFLOW 


/SUBTRACT 4 CONTAINED IN OFFSEY 20 OF BASE REG 


/STORE IN OFFSET 22 OF BASE REG 

/L,OAD OFFSET 22 IN BASE REG 

/SUBTRACT RAN ARG 

SIN TABLES 

/JMP YP FAC? 

/RET ROUTINE YO REPNTER MAIN FPP PROG 
/LQOA0 WITH RESUL? 

/IN FABLE? 


/ADD 4 CONTAINED IN OFFSET 26 OF BASE REG 


/STORE JN QFFSET 32 BASE REG 

/LOAD OFFSET $2 IN BASE REG 

/SUBTRACT RAN ARG 

AYN TABLES 

/JMP TF FACae 

/RET ROUTINE YO REsENTER MAIN FPP PROG 
/DATA ERROR EXIT 


/ 

ZENTERED ONLY IN FLOATING POINT MODE 
/WHEN RESULY HAS ZERQ MANTYSSA 
/ROUTINE FESTS FOR A LEGAL UNDERFLOW 


/ 
Fem), 


FLOALaY@ 
TABLEie3 
FMUL 1246 
JEQ 
RET 


7|,QAD RANDOM ARG 

/FROM YABLEY 

/MULTIPLY BY CONSTANT {N OFFSET 16 OF BASE REG 
7JMP TF FAC8S 

/RET ROUTINE FO MAIN FPP PROG 




















/FLQATING POINT 


2377 
23578 
2379 
2382 
2384 
2382 
2383 
2384 
2985 
2386 
2387 
2368 
2389 
2390 
2394 
2392 
2393 
2594 


5440 
5444 
5142 


31443 
5144 
5145 
5146 
6447 
5150 
5454 
5452 
5153 
54184 
5455 


5456 
5487 
5162 
3143 
3462 


5463 


5464 
8165 
3466 


5167 
5170 
5474 
5472 
5173 
5174 
5175 
5176 
5477 
5208 
5203 
5202 
S203 
5204 
5205 
5206 
5207 
5240 


OATA EXERCISER DIALI2 VoaS 


2982 
6236 
A2a2 


0440 
3775 
2432 
6375 
1042 
5455 
1059 
5455 
1938 
3026 
AB88 


8026 
01080 
7609 
0404 
2608 
2403 
agag 
1938 
3684 


2006 
A1ag 
7682 
e4e4 
agag 
B18e 
Bae 
A183 
0002 
a1o4 
ag44 
0405 
7764 
A4a6 
agag 
A407 
Agog 
1030 


FCLA 
FSTA{236 
FEX|? 
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/CLEAR FAC 
/FLAG 8 UNDERFLOW NOT LEGAL 
/DATA ERROR EXIT 


/ 
JENTERED ONLY IN FLOATING POINT MODE 


/FROM FPP4?7 TEST 


/COMPARES RESULT IN TABLE2 WITH RAN NUM IN TABLES 


/ 

FOP47, FLOAI4Y2 
TABLEGaS 
FSUB14S2 
TABLE2aS 
JGT 
,o5 
Jhf 
a3 
JA 
RET 
FEX TT 


/LOAD RAN ARG 

/FROM TABLES 

/SUBTRACY RESULT 

/{N TABLE? 

/JMP JF FAC GREATER THAN @ 
/ERROR 

/JMP JP FAC LESS TRAN @ 
/ERROR 

7JMP ALWAYS 

JRETURN ROUTINE TO REENTER FPP PROG 
/DATA ERROR EXIT 


731 UP OF FPP INDEX REGISTERS 
/FOR OPERATION IN DOUBLE PRECISION MODE 


/ 

DOPSET, STARTO 
LOX} 
7600 
LOXI4 
a 


LOX] 
Y 


JA 
BASE as? 


ASEY OOUSLE PRECISTON MODE 
/i,,0aA0 IR @ 

WITH e282 

/i,0ad ER 4 

WITH & 

/1,0A0 ” 3 

AWITH 8 

/UMP ALWAYS 

/OPFSE? 6 IN BASE REG TABLE 


/ 
/SeT VP OF FPP INDEX REGISTERS ON PAGE @ 
/FOR OPERATION IN HOUBLE PRECISION MODE 


AENTERED FROM FPPi9 TEST 


/ 

OPSETL, STARTO 
vil 

768 

ra 4 
box}? 
g 
LOX; S 
g 
LOX; 4 
14 
LOX{|2 
7764 
LOX}6 
B 
LOX}? 
Ys) 


JA 


Ai,0A0 {R B 
AWITH #289 
fi,0a0 TR 4d 
AWITH 8 
/\i,0A0 IR 2 
AWITH @ 
/1,0A0 IR $ 
WITH @ 
/i,QOA0 IR 4 
AWIiTH 44 
7,0A0 JR 3 
AWITH #44 
/.,Ga0 IR 6 
AWYTHM & 
AiQOa0 IR 7 
/WITH @ 
AJMP ALWAYS 


ttt 
i fe 
\ 
he 


1 PREPURLAA aimed sneannLcninalannnnmnnnneneey 


de JAE eet nreienen enn tne 





a~ 


\ ; 


/FLOATING POINT 


2432 
2433 
2434 
2435 
2436 
2437 
2638 
2439 
2446 
2444 
2442 
2443 
2444 
2445 
2446 
2447 
2448 
2449 
2450 
2454 
2452 
2453 
2454 
2455 
2456 
2457 
2458 
2459 
2460 
2464 
2462 
2463 
2464 
2465 
2466 
2467 
2468 
2469 
2472 
2474 
2472 
2473 
2474 
2475 
2476 
2477 
2478 
2479 
248¢ 
2484 
2482 
2483 
2484 
2485 
2486 


324i 


Sete 
S243 
3214 
3245 
5216 
3247 
52208 
3224 
$222 
5223 
5224 
5225 
3226 
3227 
5250 
32@S4h 
3232 
52338 
5234 
5235 
5236 
3257 
3242 
5444 
3242 


5243 
5244 
5245 
5246 
5249 
52308 
5254 
3252 
3238 
5254 
5255 
5256 
5257 
5262 
3264 
5262 
5263 
5264 
5265 


DATA EXERCISER DIALLa 


2624 


A006 
A108 
7689 
ALA4 
000g 
2102 
7602 
A1a3 
288 
a404 
2988 
0405 
2900 
A106 
C0098 
a407 
20a9 
2549 
6776 
6559 
7376 
2129 
7438 
1232 
364 


O206 
2182 
7684 
ALGG4 
2920 
04182 
C204 
A4as 
M980 
2104 
PAD 
a4as 
A2AS 
0406 
0989 
04087 
AAD 
1232 
BEAL 


BASEw4 


2eaAUG 
/OFFS 


272 7437 PAGE 1253 
E? 0 IN BASE REG TABLE 


/ 
/SET YP OF FPP INDEX REGISTERS ON PAGE @ 
/JDUPLICATION OF TABLES INTO TABLES 


/ 

DPSET2, STARTD 
LOX{2 
7682 
LOX}4 
g 
LOX}2 
7682 
LOX{S 
g 
LOX} 4 
4 
LOXS 
g 
LOX}6 
] 

LOX{7 
4) 

MOR, PLOA{S42 
TABLE Sa2 
FSTA!552 
TABLE Gee 
JXNI L208 
MOR 


JA 
BASE a4 


/L,CA0 
WIT 
/\,0A0 
AWITH 
/1,0A0 
AWS TH 
A\,QAD 
AWITH 
/\,0A0 
AWITh 
/\,0A0 
/WiTk 
/,0A8 
WY TH 
/1,0A0 
/WIiTk 
/,QA40 
/FROM 
/STOR 
/{N ? 
/DONE 
/NOeB 
4 MP 

/OPFS 


IR @ 
2200 
TR 4 
e 

IR 2 
9208 
IR 3 
0 

IR 4 
# 


IR 5 
2 
{R 6 
a 


1R 7 
a 
RAN ARG 
FABLES 
cE if 
ABLE 
20@ TIMES 
QO IT AGAIN 
ALWAYS 
E? @ IN BASE REG TABLE 


/ 
/SET UP FPP INSBEX REGISTERS ON PAGE 8 
/FOR VSE IN BOUBLE PRECISION MODE 


/ 

DPSETS, STARTD 
LOX{S 
7684 
LOX$4 
g 
LOX}2 
4 
LOX}S 
g 
LOX} 4 
LDX}5 
a 
LOX} 6 
g 
LOX47 
4 


wA 
BASE#4 


~ 


“SET 


/\,OAD ft 


AWY TH 
/\,0A0 
/WUTH 
/\,Oa0 


DOUBLE PRECISION MONE 
R @ 


ei?? 
TR i 


a 
IR é@ 


WITH Y 


/,,OA0 
AWITH 
ETC 


7 JUMP 
/OFFS 


R98 
M4 


ALWAYS oe 
Ev @ IN BASE REG, TABLE 














/FLQATING POINT 


2487 
2488 
2489 
2492 
2494 
2492 
2495 
2494 
2495 
2496 
2497 
2498 
2499 
25008 
2504 
2982 
2503 
2504 
2585 
2506 
2507 


5266 
5267 
5278 
5274 
5272 
5273 
5274 


3275 
5276 
5277 
3928 
S304, 


3302 
5383 
5304 
5585 
3546 
5387 
2912 
33i4 
5312 
5343 
3344 
3315 
3316 
3317 
3328 
5324, 
3322 
5323 
5324 
5325 


5326 
5327 
5330 
5334 
8332 


OATA EXERCISER PIALIa VeGS 


2442 
6776 
2430 
7396 
1088 
5226 
CLT 


C634 
2642 
1982 
5026 
8088 


LY: 
oga2 
241028 
7726 
484 
2808 
2162 
S888 
A403 
2008 
0404 
ABAD 
0405 
S082 
2406 
G880 
2407 
a98¢ 
12328 
5604 


2442 
6772 
243¢ 
7372 
10%¢ 


20AUGe7e2 7137 PAGE 1051 


/COMPARES DOUBLE PRECISION NUMBERS 


/TABLES WITH TABLES 


USING DOUBLE WORD DIRECT REFERENCE INSTRUCTIONS 


/ 

DPCMPR, FLDAIALO 
FABLE Se2 
FSUBI43¢ 
TABLE ded 


/LOAD RANDOM ARG 
7FROM TABLES 
/SUBTRACT RESULT 
/FROM FABLES 
AJMP JF FACe? 
470 RET 

/DATA ERROR EX{T 


/ 
/COMPARES DOUBLE PRECISION NUMBERS 


/TABLES WITH TABLES 


JUSING SINGLE WORD INDIRECT REFERENCE [INSTRUCTIONS 


/ 
DPEPR4, FLDAI6SS 
PSUBI6¢2 


/,,0A0 RESULT FROM FABLES 
/SUBTRACT RAN ARG PROM TABLES 
AgMP YP FACES 

470 REF 

/QATA ERROR EX{T 


/ 
/SEYT UP PPP INDEX REGISTERS ON PAGE @ 
/FOR USE IN EXTENDED PRECISION MODE 


/ 

EPSET, SYTARTE 
FCLA 
LOX}? 
7726 
LOX}4 
g 
LOX{2 
g 
LOXIS 
", 
LOX} 4 
g 
LOx ts 
Ys 
LOx16 


p 
LOX!? 
8 


JA 
BASE #4 


/SET EXTENDED PRECESION MOBE 
/GLEAR Fag 

/,,QA0 fR B 

AWETH 7726 

ALGAGO TR 4 

fWifr @ 

JEFC 


AMP ALWAYS 
/OFFSE? @ IN BASE REG FABLE 


/ 
/GOMPARES EXTEND PRECISION NUMBERS 


/TABLES WITH TABLES 


JUSING DOUBLE WORD DIRECT REFERENCE INSTRUCTIONS 


/ 

EPEPR, FLOAI4&6 
TABLE S#6 
FSUB!43¢@ 
TABLE 4e@6 
WEG 


/LOAD RAN ARG 
/FROM TABLES 
/SUBTRACT RESULT 
/IN TABLES 

/JMP IF FACHO 


oo 


= 


/FLGATING POINT DATA EXERCISER 


2542 
2543 
2544 
2545 
2546 
2547 
2548 
2549 
2552 
2554 
2552 
2553 
2554 
2955 
2556 
2557 
2558 
2559 
2560 
2564 
2562 
2563 
2566 
2565 


2578 
2379 
2580 
2584 
2968¢@ 
2583 
2584 
2585 
2586 
2587 
2588 
2589 
2599 
2594 
2592 
2593 
2594 
2095 
2596 


5333 
3334 


5335 
5336 
5337 
5340 
5344 
5342 
5343 


5344 
3345 
5346 
5347 
5352 
5354 
53352 
5353 


3354 
5355 
3336 
5337 
53462 
53464 
5362 
5363 
3364 
3365 
3364 
5367 
3372 
5374 
357¢@ 
5378 
5374 
3375 
3376 


5377 


3026 
2889 


8449 
5772 
2439 
6372 
1892 
5826 
2090 


410 
5772 
2439 
6372 
1948 


3026 


8410 


DJALI2 


RET 
FEX}T 


- 1 3 
ZebAGe72 


/¥O RET 
DATA ERROR EXIT 


VOGS 7137 PAGE 1252 


/ 

/COMPARE EXTENDED PRECISION NUMBERS 

/TABLEL WITH TABLE2 

/VSING DOUBLE WORD DIRECT REFERENCE INSTRVETIONS 


/ 
ECPRi, 


FLDAI442 
TABLELe6 
FSUBI43¢ 
TABLE2a6 


/, OAD RAN ARG 
/FROM FABLEL 
/SUBTRACT RESULT 
JIN FABLE2 

/UMP JF FACed 
/¥O RE? 

/DATA ERROR EXT 


/ 
/COMPARE EXTENDED PRECISION NUMBERS 

/TABLES WITH TABLE2 

/ROUTINE ENTERED FROM EPM ADDeSUBTRACT TES? PPPQ3 


/ 
ECPRAS, FLDAIGY9 


FABLELe6 
FSUB{ 430 
TABLE Qe6 


/.OAD RAN NUM ARG 
/FROM TABLED 
/SUBTRACT RESULT 
JIN FABLE2 

/UMP IF FAG NQOYs@ 
/¥O ECASCK ROUTINE 
/JMP ALWAYS 

40 REF 


/ 
/POSSJBLE ADDeSUBTRACY ERROR JN FRP2S TEST 
/ 


EASOK, 


FLOAI49¢ 
TABLE 2e6 
PFSTA{222 
FOLA 
STARTO 
SETX 

ex 

XTAS6 
ATX}@ 
SETX 
FPPIR 
STARTE 
FLDA{222 
FADON!228 
FSUBI442 
FABLE Le 6 
JEG 


/,0AD RESULTING ARG 

/FROM PABLEQ 

/STORE IN OFFSET 22 OF BASE REG 

/CLEAR FAG 

/SEY DOUBLE PRECISION MODE 

/SET FPP IR POINTER 

#70 Lac EX 

/EXPONENT OF OFFSE® 22 To Pac 
/SET EXPONENT OF QFFSET 96 TO FQUAL THAT OF OFFSET 22 
/SET FPP IR POINTER 

/70 LOC FRPP JR 

/SET EXTENDED PRECYTSION MOBE 

/OFFSE? 22 70 FAC 

/ABO OFFSET 20 70 SUBTRACT ONE 

/SUBTRACT RAN NUM ARG 

/N TABLES 

/JMP IF FAC? 

770 REY ROUTINE 

/DATA FRROR EX{T 


/ 

/COMPARE EXTENDED PRECISION NUMBERS 

/FTABLES WITH FABLES 

JROVTINE ENTERED FROM EPM MULTeOIV TES? PRP24 


/ 
ECPRMD, 


PLOAI44¢2 


/,,OAD RAN NUM ARG 

















2597 
2596 
2599 
26ne 
2604 
2602 
2603 
2904 
2605 
2606 
2607 
2688 
2609 


‘) 


5486 
5423 
54@2 
5483 
5484 
5405 
5486 


$487 
$410 
5444 
3442 
$443 
5444 
5445 
5416 
5447 
5420 
5424 
5422 
5423 
$424 
5425 
5426 
5427 
$439 
8434 
8432 
8433 
5434 
3435 
3436 
5437 
5449 
5444 
B442 
5443 
5444 
5445 
5446 
53447 
5459 
5454 
5452 
5453 
5454 
5455 
5456 
5437 
5442 
5464 
5462 
$463 


6772 
2432 
7372 
1042 
3487 
1232 
5826 


3439 
7972 
104g 
5474 
A449 
4772 
6222 
aga2 
2906 
41098 
5669 
AO36 
9928 
1199 
5746 
agen 
4490 
B932 
S258 
8439 
7372 
6222 
apa2 
8222 
2449 
8772 
4222 
4209 
3826 
a222 
24412 
6772 
4242 
1922 
3826 
4222 
2440 
6772 
14229 
1229 
1202 
5226 
2222 
2446 
6772 


/FLOATING POINT OATA EXERCISER 


OFALLe 


TABLES @46 
FSUB!1432 
FABLE 4s6 


Vags 


2eAUGe72 7187 PAGE 4053 
/FROM FABLES 

/SUBTRACT RESULT 

/{N TABLES 

/JMP IF FAC NOTSa 

/70 EMDCK ROUTINE 

/JMP ALWAYS 

/7O REF 


/ 
/POSSJBLE MULTeOIV ERROR [N FPP24 FEST 
/ 


EMDGK, 


FLOAI4S2 
FABLE 406 
JEQ 

EZMD 
PLDAI4¢3 
TABLES #6 
PSTA!222 
FCLA 
STARTO 
SETX 

F Xx 

XTAI6 
ATX(A 

SE TX 


FLOAI43@ 
TABLE 4e6 
FSTA}222 
PCLA 
FLOA!222 
FSUB{ 448 
FABLES es 
FADD} 228 
JEG 

RET 
FLOAlL222 
FSVBI 442 
FABLE Sad 
FADD} 242 
JEQ 

RET 
FLOA!222 
FSUBI44¢ 
TABLE Se6 
FADO!228 
FAD0D!22¢2 
WES 

RET 
FLDA} 222 
FSUBI442 
TABLES e6 


/.,GA0 RESULTING ARB 
/FROM FABLES 
/JMP IF FACa® 
/¥0 EMD ROUTINE 
/,QAD RAN NUM ARG 
/FROM FABLES 
ASTORE Oe OFFSET 22 
/CLEAR Fag 
/SET QOUBLE PRECISYON MORE 
/SET FPP IR POINTER 
/¥O Loe &x 
/EXPONENT OF OFFSET 22 TO PAE 
/SET EXPONENT OF OFFSE? 392 POUAL 7O THAT OF OFFSET 22 
SET FRPP IR POINTER 
#¥O LOG EXd 
/SET EXPONENT OF OPFSE? 22 
/SET FRPP IR POINTER 
ff0 1Q¢ PPP [R 
SET EXTENGED ay ae MOBE 
/, GAD PRECISION aR 
/IN TABLES 
STORE IN OFFSET 22 
/JELEAR THE Fac 
/L,QA0 OFFSET 22 
ela RAN NUM ARG 
IN FABLES 
/AOD OFFSET 22 EFFECTIVELY SUBTRACTING 1 
/JMP YF FACe@ 
“TO REF 
/,,QOA0 OFFSET 22 
/SUBTRACT RAN NUM ARG 
JIN FABLES 
/ADD OFFSET 42 EFFECTIVELY ADOING 4 TO Fad 
/QMP IF FaCad 
f7Q REF 
/,Qa0 OFFSET 22 
/SUBTRACT RAN NUM ARG 
IN TABLES 
/ADO OFFSEY 28 EFFECTIVELY SUBTRACTING 4 FROM Fae 
/ADO OFFSET 22 EFFECTIVELY SUBTRACTING 1 FROM Fac 
/JMP IF PaCee 
/¥0 REF 
/LGAG FAG WITH OFFSET 22 
/SUBTRACT RAN NUM ARG 


/JN FABLES 
oY | a _ 
| C 


oe 


ms 
os 


ie 


Seen autiateemaernnsnerenen nen we le wee - 


18 we 5 omaslamnemsanemltnriatrtien Ae ns 


aaa! 
/FLQATI 


2652 
2653 
2654 
2655 
2656 
2657 
2658 
2659 
2660 
2664 
2662 
2663 
2664 
2665 
2066 
2667 
2668 
2069 
2672 
2674 
2672 
2673 
2674 
2675 
2676 
2677 
2678 
2679 
2680 
2983 
2682 
2683 
2684 
2685 
2686 
2687 
2688 
2089 
2692 
269) 
2692 
2693 
2094 
2095 
2696 
2097 
2698 
2099 
2700 
2704 
2702 
2793 
2704 
2705 
2706 


€ PON? 


5464 
5465 
5466 
3467 
5470 


5474 


3472 


5600 
3684 
3602 
3683 
3604 
3685 
5646 
3687 
3610 
3644 
5642 
3649 
5644 
5645 
5646 
3647 
3622 
3624 
5622 
3628 
5624 
5625 
3626 
3627 
5632 
3634 
5632 
3635 
3634 
3635 
3636 
3637 
5640 
5644 
3642 


aan, 


f 


DATA EXERCISER OLALL2 VeOs ZeaAUGe7e 7137 PAGE 1254 
1242 FADD{242 /ABD OFFSEY 42 EFFECTIVELY ADDING 1 VO Fat 
1242 FADD!242 /ADO OFFSET 462 EFFECTIVELY ADDING 4 FO fue 
1222 JEO /JMP YF Faced 
5926 RET /TO REF 
A208 FEXIT 
/ 
/POSSIBLE DATA ERROR @ CHECK WITH 8 MODE 
/ 
2200 FzmMO, FEXIT JEXIT 
f 
/NOT USED © FLAGS LAST FEXIT @ (INSTRUCTION EXIT POINT) FOR 8 MODE USE 
/ 
A809 ENO, 0 
/ 
/ 
/BASE REGISTER TABLE 
/CONTAINS CONSTANTS oF LAGSw TEMPORARY STORAGE 
/BASE#s AND BASES2 CONTAIN RETURN JMP FROM SUBROUTINE 
/ 
5608 05600 
ABO BASE, @ /OFFSET OF 2 
egeg g 
agag ‘4 
A208 2 /OFFSET OF 4 
2209 a 
7376 7376 
ageag a /OFFSET OF 2 
aga9 4 
6776 6776 
gag 2 /OFFSEY OF 3 
ogee 2 
5775 5775 
Agno ', /OFFSE?T OF 4 
ogog Y, 
6395 6375 
egg 8 /OFFSE? OF § 
A209 a 
208 2 
2208 ty /OFFSET OF 6 
A208 2 
A908 +, 
ET) a /OFFSEY OF 7 
A900 "4 
2200 2 
9900 M4 /OFFSET OF 42 
B280 0 
ag0g LOKTST, 2 
ag00 4 
2002 Y, 
2209 a 
A808 a /OFFSET OF 42 
ABA i, 
0200 Q 
ry) a 
220g a 














2707 
2708 
2709 
2742 
2744 
2742 
2748 
27144 
e749 
2746 
2747 
2718 
2749 
2720 
2724 
2722 
2723 
2724 
2725 
2726 
2727 
2728 
2729 
273 
2734 
2782 
2733 
a734 
2735 
2736 
2737 
2738 
2739 
2749 
2744 
2742 
2743 
2744 
2745 
2746 
2747 
2748 
2749 
2782 
2754 
2792 
2753 
2754 
2755 
2756 
2757 
2758 
2759 
2760 
2764 


AFLQATING POINT 


5643 
5644 
5645 
5646 
5647 
5652 
5654 
5652 
5653 
5654 
5655 
5636 
5697 
53660 
5664 
5662 
5683 
3664 
5665 
5666 
5667 
8676 
5O74 
5672 
5673 
5676 
675 
5676 
5677 
5700 
5704 
5792 
5703 
5794 
5705 
5706 
5709 
5742 
5744 
8742 
8743 
5744 
5745 
3746 
5747 
5739 
5724 
5722 
5723 
5724 
5725 
5726 
8727 
5730 
S734 


z 
Lae 


SATA EXERCISER 


8298 
BGA 
C208 
2002 
S802 
2288 
OB98 
6000 
5777 
7777 
7797 
7777 
7777 
GBA 
7777 
77797 
7777 
7777 
7777 
8882 
0888 
C088 
0890 
C980 
A029 
OBOE 
O88 
2298 
2088 
C829 


2G89 
ah D's 
B98 
S080 
0082 
99908 
agag 
8890 
2680 
8868 
2988 
BOGS 
ABA 
2888 
ed) 
BRAD 
ADA 
ay 
EPA 
ADAP 
Eee 


EX 


LQKSEG, 


RESULT: 


OLALL¢ 


2ehUGa7e 


/OFFSET 


SOFFSET 


/QPFSE? 


/OFFSET 


/OPFSEF 


/QPFSET 


/OPFSE? 


/OFFSET 


/OFFSE? 


oF 


OF 


OF 


OF 


OF 


OF 


OF 


OF 


OF 


14 


16 


2g 


22 


24 


26 


36 


Se 


34 


7137 





le vit AaAaapatadd alan 


( \ 
JFLOATING POINT DATA EXERCISER DIALL@ VOaS 
2762 5732 2989 2 
2763 S733 agag a 


2764 5734 7777 UFLO» 7777 
2765 5735 90g 0 


PAGE 1056 


2eAUGa72 7437 
SOFFSE?T OF 36 


2766 5736 7042 a 
2767 5737 2890 a 

2768 5740 208¢ a /OFFSET OF 42 
2769 5744 2000 2099 

2772 5742 8002 2 

2774 5743 9909 g 

2772 5744 2908 2 

2773 5745 7999 B 

2774 5746 9909 EX4, 8 /OFFSET OF 42 
2775 5747 2000 ‘4 

2776 5750 gag g 

2777 5751 90g 2 

2778 8752 2209 g 

2779 5733 A904 1 

2780 / 

2784 / 

2782 / 

2783 /FLOATING POINT MODE 

2784 /RANOOM DAYA TABLE 4 

2785 4408 QOCTAL LOCATIONS LONG 

2786 / 

2787 6902 ©6208 

2788 6908 a00¢ TABLEL, 2 

2789 / 

2799 / 

2794 /FLOATING POINT MODE 

2792 /RESULTING ARG TABLE 2 

2793 /USED IN ASSOCIATION WITH TABLE 4 
2794 /480 OCTAL LOCATIONS LONG 

2795 / 

2796 6499 #6490 

2797 6400 9900 TABLEZ, @ 

2798 / 

2799 / 

2640 /DOYBLE PRECISION MODE 

2604 /RANOOM DATA TABLE 3 

2892 4402 OCTAL LOCATIONS LONG 

2883 / 

2804 700¢ 47098 

2605 7900 e008 TABLES, 2 

2606 / 

2807 / 

2808 /QOVBLE PRECISION MONDE 

2809 /RESULTING ARGUMEN? TABLE 4 

2440 /USED IN ASSOCIATION WITH TABLE 3 
2841 4490 OCTAL LOCATIONS LONG 

2842 / 

2843 7409 #7490 

2844 7409 af0g TABLES, B 

2845 / 


2816 / 





£46°8T 39¥¢d 


4644 





r) dz2k2 
SULOLOETLATATOLLLELALATT AANA AA AAS 6te2 
VIGTTTAEETTTEWN DOM 40 ONISS SS SSIS/ gta2 
FUTAIOVATATAATATTOTATATA AAAS GA AAT Zte2 


Ch289NVEZ 


S20A @8%vic wasidu3x3 Vayo aNlOe SNtivodg/ 








o~ 


3 
¥ 


JFLOATING POINT DATA EXERCISER ODIAL4O voo3 


AVS 
A100 


9200 
e300 


4488 
2508 


2680 
2708 


1282 
4102 


4.280 
14580 


4480 
4988 


4608 
4708 
2000 
2408 


2¢00 
2908 


2402 
22982 


2602 
2702 
3202 
3408 


3200 
3308 


3420 
3508 


3689 
3788 


Lisiiiti 
» ES. eS ied 


pHs I Oe Ee 
Liviiiti 


L2@1iiiii 
disiididti 


Liqiiiti 
SPeVegeg 
1isiiiii 
Lagadgaisi 


Orgiiiis 
Lagididti 


34922114 
11222111 


Li¢diati 
L4dacaia 


41244113 
PSSE SSS! 


42224114 
42921121 


SS SSESS! 
SEP SESS! 


44224171 
Li%iiiii 


L1iiiiii 
11244411 


24404111 
Ligiiiti 


Liaiiiii 
filatiit 


pi Us te le ee 
Litstiit 


ti4ad411 
tidaiiia 


ye i 
28090080 
fiiaiii1 
Ee Sh mie 


114idid4 
Ladaiiss 


4idaii44 
14214144 


dadadaid 
dacacits 


tidadaia 
14214141 


tadasaia 
tididiis 


4af11444 
44014414 


14441411 
4idii4i4 


141114141 
Listiits 


14dadaii 
tidadadi 


41114111 
p Se Be Bes BS Ge 8 


11414111 
11414114 


nip GE 
442141413 


41414141 
SPABEVAG 
41114114 
41414141 


41114441 
4idi444a4 


44414414 
44214114 


44114444 
1dadii2 


442149414 
411131114 


4121491114 
41214441 


41244414 
4itidiil 


Z1idid4i4 
44244441 


44114114 
41111112 


{1414411 
41211111 


11411111 
4iddiii1 


11414141 
11119082 


41444444 
didiiiia 


44444171 
agegedeg 
4141444 
4ad4iif1 


tidiiiis 
1idaiid1 


4ahaiid1 
11411000 


414444474 
42444474 


4idiaaids 
1asisifs 


tidaiida 
Lidiiida 


44411491 
41444471 


444414421 
11419202 


1a¢i44f1 
BROLAA0 


44441441 
44441441 


2eAUGa7e2 


11111112 
{iii4441 


4i4iiiii1 
GOPHASHS 


11114114 
S2AA8A088 


diiiidii4 
BOSAORAL 
44242411 
fiiiiiie 


11444411 
diiisiii 


diiidiis 
GBSG8B8S 


41444144 
q1444414 


4itaiii1 
SERED! 


t1114421 
41444141 


41414114 
Citisids 


L434d341 
COSHEOA2 


111441144 
BOSRAGAD 


11414114 
Liiisiii 











1adiii41 
11111111 


11241311 
SG9S2080 


14411111 
CCOSIRAL 


Lidiiii4 
SBAG2080 
41443141 
GOCa088e 


44424441 
11321421 


12412434 
SAGSHLHS 


SS SOs 5! 
11111882 


Lidiiait 
22417441 


1idiiiit 
ESSSS SS! 


11213141 
11442141 


Lidiiiii 
SAEH2R88 


Liiiiiii 
ABAGCHA0 


11241114 
11411741 


7437 


{iiidiis 
Titiditi 
EEE EGG 
SQACIB2A 
fiiiiiis 
SSAGG82 


{iiii9ed 
90000000 


Tidigiis 
agagteea 


T1iifiis 
Taiitiis 
Tiidiais 
aongaeae 


Tiiidait 
ageoegeg 
qidiliti 
{aialadi 
fiisfiis 
Cidifads 


Piiigais 
Tiidiadi 


Giiifiss 
Garaeoae 


firiiiid 
SAEVGA%S 


{fititiis 
Tiiidaiiti 


PAGE 1258 


Ticats 
47142142 


1ii1itit 
Cgeatgeg 


{1f11141 
agrgoang 


A2eeeo90 
*BA00G02 
42442144 
ApagageB 


iitatiii 
i1ageo0o 


4ifita42 
opegeege 


11714141 
ABACOOR2 


iadiaias 
{eageaaa 


didatais 
iif1i444 


44044444 
qatat144 


11114144 
AZagegae 


14712444 
A2OBeRae 


42406141 
114111122 











FLOATING POIN? DATA EXERCISER OLALI@ vee@s 


400g 
4100 


4206 
4300 


4402 
4500 


4688 
4788 
5088 
5100 


5280 
5580 


5480 
5909 


3668 
5700 
6008 
6106 


6322 
6500 


6408 
6908 


6680 
6780 
7082 
7402 


7206 
7582 


7488 
7300 


7088 
7788 


1iiitiil 
Lididsiti 


L4i11111 
Ligdiiti 


22942141 
443941111 


Lidgitiil 
aicitiid 
42242111 
LiLaL111 


4124413141 
24932141 


SESS SES! 
OBL SLID 


42232411 
Ligiiiii 
1G C2098 
BAEC POSHS 


LGlGAGID 
BBE SIBBL 


122 OP HA8 
EOLLOBHD 


10202922 
Ggegagag 


© 


ii4i11i1 
4i4idiii 


1iiaiai4 
12422412 


L1i4d111 
1444daii 


14iiiii4 
1adai111 
11141144 
11421111 


41122141 
iiiadiii 


Lidiiiti 
G0A98082 


sidadai4 
44411311 


SBASCOSAL 
SACS LHES 


CHOG0880 
SPOBSLOD 


2PSG0092 
PPAGLLOD 


CVGHSHER 
PBSAAIAD 


4iiidii4 
41214141 


41114414 
41114114 


414114111 
11114414 


41244114 
111139111 
$4214411 
Gii14414 


114449111 
qititaas 


41114111 
GABGSHAD 


4itidiii 
Zii13341 


SZPGSCAG 
G2S0LG0S 


9SSSSGAG 
GPECLHSS 


SALDECAS 
SOOSORSH 


GOSALBSR 
BB2GCRAB 


1id1iii1 
Liiiiiis 


1ifaiiis 
41f44ii1 


tiiiiifi 
41411171 


11441471 
414411if1 
141414171 
1414441101 


41gdiii1 
Lidiiiit 


144141411 
AGALABR2 


41441471 
qiditifts 


AG008008 
Ag8088ag 


APSSA09R 
ABACSBSS 


ABSOSOID 
ABESACSS 


AGA2A082 
BROECHCSR 


2eaAyGea72 


11114111 
444112111 


i1444111 
diiid4i4 


44244444 
Cisitiii 


Gisasiids 
L1tid141 
41244144 
ereeeee 


di4idiis 
Ciditiit 


442241421 
CBESOHSS 


{iti4i144 
disadisa 


GSSGLHRAe 
0280888 


agaeeaee 
goagegae 


B2AISAIAP 
AABASBOD 


DOSACBAB 
GQASKAAP 


11111141 
412431441 


11411441 
114143141 


Liiiiiti 
Aiitiitiii 


11111341 
11411411 
11414331 
14411341 


1idaiiti 
44411141 


114111241 
SOER0S8S 


11413431 
11112988 


SOGSERLO 
SO8R089E 


SGOHEHSe 
SOGS08G 


SA8G20 88 
SISSCHIS 


AOSSAGH9 
SSSSAG2S 


7137 


{iiiisis 
{iiitats 
T1iiiiii 
Taisafiii 
Tiiiiiis 
Tiiifiit 


{aiidiis 
{iiifiis 


W1iitiii 
ifsiiii 


idiizis 
Tiiiisadi 
f1iiiads 
soegeoag 
t1iidsit 
sgagegag 


89800800 
S0088008 


GGOVESER 
G2OCH88G 


SBEGAGAG 
82088088 


S288 0R9 
ABSSASAS 
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11414141 
1ifitiii 


diiiiiii 
dafizadi 


diiiiait 
iif42441 


qifaiasi 
41f11141 


iifisadi 
difaitadi 
Titidi 
dididi 


tiiedeee 
sggoooee 
fifasids 
eaegeoee 


4 
1 
1 
1 


Hoppe; 


sgneceee 
agageoes 


29090808 
egtacaea 


eodacaee 
MPA 90GHe 


M9IG2G8B 
Agégeaag 


bees 


= ee acca ial aaa 








‘ ¥ 
/FLOATING POIN? DATA EXERCISER PIALA2 vea3 2ehyGn7%2 7437 PAGE 1262 
ACSAVE 2903 EX4 5746 FPP47 4496 K40 A447 
ADDX 21412 EXPOV #642 FPP? 4329 K4 oe i a, 
AG 2323 EXPOVR 4532 FPP2¢ 4596 Kiag> 24145 
ALN P2412 EXPUN 62g FPP24 4546 Kid @122 
AL TEX Ag45 FXPUND 9527 FPPQ2 4644 Ki2 2124 
ALTEXP 2277 EZMD 5474 FPP23 4642 Ki202 2446 
APS 2216 FZMDC 1442 FRP24 46466 Ki3 7122 
APT 2625 FADD 4202 FPPS 4942 K44 2123 
APTIR 2280 FADOM S8f9¢ FPP4 4264 Ki5 2124 
APPTIRY 1374 FASCK 5294 FPP5 44i{2 K46 9125 
APTIR2 1534 FASCK1 8074 FPP6 4436 K4? 0126 
APTIRQ 28526 PCA A202 FPP? 4463 K2 iii 
ATX S220 FCMPAS $244 FPPCUR 2865 K2o G127 
BASE 5602 FOMPMD 5292 FPPIN 68266 K2ao o534 
BELL 0107 FOMPR 50147 FPPINT 0426 K2009 6147 
CLLSW 044 FCP17 98443 FPPIR 9952 K2040 9535 
CLLSWO 2346 FCOPAS1 5252 FPPMOD 41137 K207 142 
CNTR ag26 FOYV S0a0 FPPS? 2463 K24 2139 
CONT 3467 FEX]? 802 FPPT 0643 K242 OL44 
COUNT 2364 FLOA a0ag PFPPT, 2451 K2¢5 142 
CPASY 5962 FMOCK 5402 FPPTR 1503 K22 4434 
eR AYa4 FMUL 4gag FPRST 65596 K23 24382 
eRLF 2352 FMULM 7008 FPST 6535 K24 133 
eT 1365 FNEG 4003 FRAQV 8624 K240 0443 
PPADM 4304 FNOP O84. FRAOVR 2534 K268 2366 
EPCMPR 5266 FNORM ogp4 FROG6 486686 64 K3 gii2 
CRPEPRY 5275 FQ 4442 FROVi6 1800 K3? 2134 
PPER 1409 FOV 2660 FSET 47¢3 K3733 A536 
EPMLM 1334 FPY 2024 PSEY4 4741 K3740 9456 
epocr 2524 FP2 2054 FSET2 4793 Kq ai{3 
CPOCTL 1378 FPADM 4272 FSTA 684g K42 9435 
ePOCT2 1533 FPAORS 861 FSUB 2000 K48o 144 
PPOCTT 2037 FPCMD @2862 FZMO 5433 K4000 8154 
PPSET 54536 FPCOM 6553 FZMMT 1355 K4400 9182 
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